Metrics for Midpoint on a great circle

start0.0ms (0%)

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

analyze740.0ms (4.6%)

Memory

-14.5MiB live, 848.5MiB allocated; 120ms 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)

sample5.6s (34.7%)

Memory

93.0MiB live, 6 290.5MiB allocated; 502ms collecting garbage

Samples

4.3s	4 555×	1	valid
718.0ms	3 700×	0	valid
1.0ms	1×	2	valid

Precisions

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

ival-cos: 2.7s (59.2% of total)

ival-sin: 682.0ms (15% of total)

adjust: 344.0ms (7.6% of total)

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

ival-mult: 229.0ms (5% of total)

ival-add: 221.0ms (4.9% of total)

ival-sub: 83.0ms (1.8% of total)

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

Bogosity

explain518.0ms (3.2%)

Memory

-1.7MiB live, 482.5MiB allocated; 48ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
78	119	(5.6309078871517e+304 2.0814133769153143e-38 -3.0390370064407344e-153 4.9932135891965573e-225)	0	-	`(sin.f64 (-.f64 lambda1 lambda2))`
78	119	(5.6309078871517e+304 2.0814133769153143e-38 -3.0390370064407344e-153 4.9932135891965573e-225)	0	-	`(cos.f64 (-.f64 lambda1 lambda2))`
4	0	-	2	(3.1464304331191984e-66 3.288230465999417e+200 -5.3528492472389165e+247 -2.315937867624026e+216)	`(+.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	197	0
`sin.f64`	`(sin.f64 (-.f64 lambda1 lambda2))`	sensitivity	197	0
`+.f64`	`(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))`	cancellation	1	2

Confusion

	Predicted +	Predicted -
+	8	0
-	189	59

Precision

0.04060913705583756

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	8	0	0
-	189	0	59

Precision?

0.04060913705583756

Recall?

1.0

Freqs

test

number	freq
0	59
2	196
3	1

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

381.0ms	390×	1	valid
23.0ms	122×	0	valid

Compiler

Compiled 186 to 46 computations (75.3% saved)

Precisions

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

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

ival-sin: 56.0ms (17% of total)

ival-atan2: 29.0ms (8.8% of total)

adjust: 27.0ms (8.2% of total)

ival-add: 21.0ms (6.4% of total)

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

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

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

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

preprocess180.0ms (1.1%)

Memory

-0.3MiB live, 141.0MiB allocated; 14ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	95	314
1	219	313
2	422	313
3	940	313
4	2456	313
5	6076	313
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 (fma.f64 #s(literal -3/2 binary64) (PI.f64) (fma.f64 #s(literal -1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (fma.f64 (sin.f64 (+.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -4 binary64) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (fma.f64 #s(literal -3/2 binary64) (PI.f64) (fma.f64 #s(literal -1/2 binary64) (PI.f64) (fma.f64 #s(literal -1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2))))) (PI.f64)) (PI.f64))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)

Symmetry

(abs phi1)

(abs phi2)

Compiler

Compiled 20 to 14 computations (30% saved)

eval0.0ms (0%)

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

prune1.0ms (0%)

Memory

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

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	98.6%	(+.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)

series27.0ms (0.2%)

Memory

-10.1MiB live, 36.3MiB allocated; 4ms 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
5.0ms	phi1	@	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	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)))

rewrite213.0ms (1.3%)

Memory

-0.1MiB live, 231.0MiB allocated; 23ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	371	2389
0	391	2317
1	2239	2315
0	10020	2184

Stop Event

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

Counts

116 → 185

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

eval63.0ms (0.4%)

Memory: 5.5MiB live, 61.0MiB allocated; 7ms collecting garbage
Compiler: Compiled 7 477 to 1 171 computations (84.3% saved)

prune172.0ms (1.1%)

Memory

24.9MiB live, 200.0MiB allocated; 49ms collecting garbage

Pruning

15 alts after pruning (15 fresh and 0 done)

	Pruned	Kept	Total
New	205	15	220
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	206	15	221

Accuracy

98.9%

Counts

221 → 15

Alt Table

Click to see full alt table

Status	Accuracy	Program
	66.3%	(/.f64 (-.f64 (.f64 lambda1 lambda1) (.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))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))))
	53.7%	(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (fabs.f64 lambda1) (fabs.f64 lambda1) (-.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))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (fabs.f64 lambda1) (fabs.f64 lambda1) (-.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))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))))))
	98.4%	(+.f64 lambda1 (atan2.f64 (.f64 (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 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	98.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	98.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))))
▶	93.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
	93.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))
	98.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))))
▶	98.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
	98.6%	(+.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 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
	81.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
▶	72.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)))) (.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))))))
	85.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	77.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal -1 binary64) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	98.2%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (/.f64 (fma.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))) #s(literal 2 binary64) (.f64 lambda1 #s(literal 2 binary64))) (.f64 lambda1 #s(literal 2 binary64))) lambda1))

Compiler

Compiled 1 648 to 692 computations (58% saved)

series259.0ms (1.6%)

Memory

25.1MiB live, 301.1MiB allocated; 27ms collecting garbage

Counts

72 → 614

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
43.0ms	phi2	@	-inf	((+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (cos phi2) phi2 (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) lambda2 (* (cos lambda1) (sin lambda2)) (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)))))) (* (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) lambda1) (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) 2 (* lambda1 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 phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (+ (neg (- lambda1 lambda2)) (neg phi1)) (neg (- lambda1 lambda2)) (neg phi1) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (- (neg (- lambda1 lambda2)) (neg phi1)) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* (* phi2 phi2) (cos (- lambda1 lambda2))) (* phi2 phi2) -1/720 (* 1/24 (cos (- lambda1 lambda2))) 1/24 (* -1/2 (cos (- lambda1 lambda2))) -1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))
23.0ms	phi1	@	inf	((+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (cos phi2) phi2 (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) lambda2 (* (cos lambda1) (sin lambda2)) (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)))))) (* (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) lambda1) (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) 2 (* lambda1 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 phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (+ (neg (- lambda1 lambda2)) (neg phi1)) (neg (- lambda1 lambda2)) (neg phi1) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (- (neg (- lambda1 lambda2)) (neg phi1)) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* (* phi2 phi2) (cos (- lambda1 lambda2))) (* phi2 phi2) -1/720 (* 1/24 (cos (- lambda1 lambda2))) 1/24 (* -1/2 (cos (- lambda1 lambda2))) -1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))
21.0ms	lambda1	@	0	((+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (cos phi2) phi2 (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) lambda2 (* (cos lambda1) (sin lambda2)) (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)))))) (* (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) lambda1) (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) 2 (* lambda1 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 phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (+ (neg (- lambda1 lambda2)) (neg phi1)) (neg (- lambda1 lambda2)) (neg phi1) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (- (neg (- lambda1 lambda2)) (neg phi1)) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* (* phi2 phi2) (cos (- lambda1 lambda2))) (* phi2 phi2) -1/720 (* 1/24 (cos (- lambda1 lambda2))) 1/24 (* -1/2 (cos (- lambda1 lambda2))) -1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))
20.0ms	lambda1	@	-inf	((+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (cos phi2) phi2 (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) lambda2 (* (cos lambda1) (sin lambda2)) (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)))))) (* (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) lambda1) (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) 2 (* lambda1 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 phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (+ (neg (- lambda1 lambda2)) (neg phi1)) (neg (- lambda1 lambda2)) (neg phi1) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (- (neg (- lambda1 lambda2)) (neg phi1)) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* (* phi2 phi2) (cos (- lambda1 lambda2))) (* phi2 phi2) -1/720 (* 1/24 (cos (- lambda1 lambda2))) 1/24 (* -1/2 (cos (- lambda1 lambda2))) -1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))
19.0ms	lambda2	@	0	((+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (cos phi2) phi2 (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) lambda2 (* (cos lambda1) (sin lambda2)) (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)))))) (* (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) lambda1) (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) 2 (* lambda1 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 phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (+ (neg (- lambda1 lambda2)) (neg phi1)) (neg (- lambda1 lambda2)) (neg phi1) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (- (neg (- lambda1 lambda2)) (neg phi1)) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* (* phi2 phi2) (cos (- lambda1 lambda2))) (* phi2 phi2) -1/720 (* 1/24 (cos (- lambda1 lambda2))) 1/24 (* -1/2 (cos (- lambda1 lambda2))) -1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))

rewrite315.0ms (2%)

Memory

14.4MiB live, 364.9MiB allocated; 48ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2499	29096
0	2654	26699
0	8980	25915

Stop Event

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

Counts

686 → 763

Calls

Call 1

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

Outputs
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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))) (+.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))))))
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)))
(sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 phi2))
(cos.f64 phi2)
phi2
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
(sin.f64 lambda1)
(sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 lambda2)))
(cos.f64 (neg.f64 lambda2))
(cos.f64 lambda2)
lambda2
(*.f64 (cos.f64 lambda1) (sin.f64 lambda2))
(sin.f64 (+.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
(/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(sin.f64 (+.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (.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 lambda1 lambda2)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(/.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 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (/.f64 (fma.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))) #s(literal 2 binary64) (.f64 lambda1 #s(literal 2 binary64))) (.f64 lambda1 #s(literal 2 binary64))) lambda1))
(.f64 (/.f64 (fma.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))) #s(literal 2 binary64) (.f64 lambda1 #s(literal 2 binary64))) (.f64 lambda1 #s(literal 2 binary64))) lambda1)
(/.f64 (neg.f64 (fma.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))) #s(literal 2 binary64) (.f64 lambda1 #s(literal 2 binary64)))) (neg.f64 (*.f64 lambda1 #s(literal 2 binary64))))
(/.f64 (fma.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))) #s(literal 2 binary64) (.f64 lambda1 #s(literal 2 binary64))) (*.f64 lambda1 #s(literal 2 binary64)))
(+.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))) #s(literal 2 binary64)) (.f64 lambda1 #s(literal 2 binary64))) (/.f64 (.f64 lambda1 #s(literal 2 binary64)) (*.f64 lambda1 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.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))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 lambda1 #s(literal 2 binary64)) #s(literal 3 binary64))) (+.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))) #s(literal 2 binary64)) (.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))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda1 #s(literal 2 binary64))) (.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))) #s(literal 2 binary64)) (*.f64 lambda1 #s(literal 2 binary64))))))
(fma.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))) #s(literal 2 binary64) (.f64 lambda1 #s(literal 2 binary64)))
(+.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))) #s(literal 2 binary64)) (*.f64 lambda1 #s(literal 2 binary64)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
#s(literal 2 binary64)
(*.f64 lambda1 #s(literal 2 binary64))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)))) (.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))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)))) (.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))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)))) (.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)))))) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)))) (.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)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)))) (.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))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)))) (.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)))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)))) (.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))))
(/.f64 (+.f64 (pow.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.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)) #s(literal 3 binary64))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (-.f64 (.f64 (.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)) (.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))) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.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))))))
(fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)))) (.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)))
(+.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.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)))
(*.f64 (cos.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (cos.f64 (+.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)) (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)))) (cos.f64 (-.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)) (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))))) #s(literal 2 binary64))
(sin.f64 (+.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))))
(cos.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1))) #s(literal -2 binary64))
(/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))
(+.f64 (/.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (/.f64 (neg.f64 phi1) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (neg.f64 phi1) #s(literal 3 binary64))) (fma.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 (neg.f64 phi1) (neg.f64 phi1)) (.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)))))
(+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1))
(neg.f64 (-.f64 lambda1 lambda2))
(neg.f64 phi1)
(sin.f64 (+.f64 (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))))
(cos.f64 (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1))) #s(literal -2 binary64))
(/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))
(-.f64 (/.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (/.f64 (neg.f64 phi1) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (neg.f64 phi1) #s(literal 3 binary64))) (fma.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 (-.f64 lambda1 lambda2)) (fma.f64 (neg.f64 phi1) (neg.f64 phi1) (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)))))
(-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1))
(.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))
(/.f64 (+.f64 (pow.f64 (.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)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (.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 (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 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.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)))))))
(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 (.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 (+.f64 (pow.f64 (.f64 (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/720 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/720 binary64)) (.f64 (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/720 binary64))) (-.f64 (.f64 (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.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)))))))
(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 (.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 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (fabs.f64 phi2) (fabs.f64 phi2))
(*.f64 (neg.f64 phi2) (neg.f64 phi2))
(*.f64 phi2 phi2)
(pow.f64 phi2 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 phi2) #s(literal 2 binary64)))
#s(literal -1/720 binary64)
(*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
#s(literal 1/24 binary64)
(*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
#s(literal -1/2 binary64)
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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))) (+.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))))))
(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 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (.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 lambda1 lambda2)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
#s(literal 0 binary64)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))
#s(literal 1 binary64)
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) (neg.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(*.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)))
(.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(.f64 (fabs.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fabs.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.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 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx lambda1 lambda1)
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (-.f64 (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))) (sin.f64 lambda2)))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (-.f64 (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2)))))) (sin.f64 lambda2)))
#s(approx (* (sin lambda1) (cos lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (* (sin lambda1) (cos lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 lambda1 lambda1) (cos.f64 lambda2))))))
#s(approx (* (sin lambda1) (cos lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 lambda1 lambda1) (cos.f64 lambda2))))))))
#s(approx (* (sin lambda1) (cos lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 lambda1 lambda1) (cos.f64 lambda2)) (.f64 #s(literal 1/120 binary64) (cos.f64 lambda2)))))))))
#s(approx (sin lambda1) lambda1)
#s(approx (sin lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1)))))
#s(approx (sin lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/6 binary64))))))
#s(approx (sin lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1)))) #s(literal 1/6 binary64))))))
#s(approx (* (cos lambda1) (sin lambda2)) (sin.f64 lambda2))
#s(approx (* (cos lambda1) (sin lambda2)) (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 lambda1 lambda1) (sin.f64 lambda2)))))
#s(approx (* (cos lambda1) (sin lambda2)) (+.f64 (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda2) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 lambda1 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (cos lambda1) (sin lambda2)) (+.f64 (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 lambda1 lambda1) (sin.f64 lambda2)) (*.f64 #s(literal 1/24 binary64) (sin.f64 lambda2))))))))
#s(approx (cos lambda1) #s(literal 1 binary64))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1)) #s(literal 1/2 binary64)))))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1)))) #s(literal 1/2 binary64)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2)))))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (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)))))) (+.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)))))))
#s(approx (* (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) 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))))))
#s(approx (* (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) lambda1) (+.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)))))))
#s(approx (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) (/.f64 (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))
#s(approx (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) (/.f64 (+.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))
#s(approx (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (.f64 #s(literal 2 binary64) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (fma.f64 #s(literal 2 binary64) lambda1 (.f64 #s(literal 2 binary64) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (neg.f64 (sin.f64 lambda2)))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (neg.f64 (sin.f64 lambda2))))))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (* lambda1 2) (*.f64 #s(literal 2 binary64) lambda1))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda1 (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (fma.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda2))))))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (fma.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1)))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/24 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)))))))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (fma.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1)))))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1)))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 1/4 binary64) (cos.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)))))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/24 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2)))))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)))))))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (fma.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1)))))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1)))))) (+.f64 (.f64 lambda1 (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/16 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1)))) (fma.f64 #s(literal -1/16 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1)))) (.f64 #s(literal -1/48 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1)))))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/12 binary64) (neg.f64 (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/4320 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal 1/144 binary64) (neg.f64 (sin.f64 lambda2))))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 1/4 binary64) (cos.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2))))))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/24 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2)))))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)))))))))
#s(approx (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (fma.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1)))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (fma.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1))))) (.f64 lambda1 (fma.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1))))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (fma.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1)))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1))))) (.f64 lambda1 (fma.f64 #s(literal -1/16 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1)))) (fma.f64 #s(literal -1/16 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1)))) (.f64 #s(literal -1/48 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1)))))))))))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1)))))))
#s(approx (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda1 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1))))))))
#s(approx (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 lambda1 (-.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 #s(literal -1/48 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1))))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1))))))))
#s(approx (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1)))
#s(approx (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 phi1))))
#s(approx (+ (neg (- lambda1 lambda2)) (neg phi1)) (-.f64 lambda2 phi1))
#s(approx (+ (neg (- lambda1 lambda2)) (neg phi1)) (-.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)) phi1))
#s(approx (neg (- lambda1 lambda2)) lambda2)
#s(approx (neg (- lambda1 lambda2)) (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))
#s(approx (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1)))))))
#s(approx (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda1 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1))))))))
#s(approx (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 lambda1 (-.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 #s(literal -1/48 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1))))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1))))))))
#s(approx (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1)))
#s(approx (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (fma.f64 #s(literal -1/2 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda2 phi1))))
#s(approx (- (neg (- lambda1 lambda2)) (neg phi1)) (+.f64 lambda2 phi1))
#s(approx (- (neg (- lambda1 lambda2)) (neg phi1)) (+.f64 lambda2 (+.f64 phi1 (*.f64 #s(literal -1 binary64) lambda1))))
#s(approx (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)))))))
#s(approx (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (fma.f64 lambda1 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/24 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2))))))))
#s(approx (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 1/4 binary64) (cos.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2))))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/24 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda2))))))))
#s(approx (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (+.f64 (.f64 lambda1 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/12 binary64) (neg.f64 (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/4320 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal 1/144 binary64) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 1/4 binary64) (cos.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)))))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/24 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2))))))))
#s(approx (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2))))))
#s(approx (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (fma.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/24 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)))))))
#s(approx (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (fma.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (neg.f64 (sin.f64 lambda2)) (fma.f64 lambda1 (fma.f64 #s(literal 1/4 binary64) (cos.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/24 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)))))))
#s(approx (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (fma.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (neg.f64 (sin.f64 lambda2)) (fma.f64 lambda1 (fma.f64 #s(literal 1/4 binary64) (cos.f64 lambda2) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1/12 binary64) (neg.f64 (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/4320 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal 1/144 binary64) (neg.f64 (sin.f64 lambda2)))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/24 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)))))))
#s(approx (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2))))
#s(approx (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (fma.f64 #s(literal 1/24 binary64) (cos.f64 lambda2) (.f64 lambda1 (fma.f64 #s(literal -1/24 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2)))))))))
#s(approx (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (fma.f64 #s(literal 1/24 binary64) (cos.f64 lambda2) (.f64 lambda1 (fma.f64 #s(literal -1/24 binary64) (neg.f64 (sin.f64 lambda2)) (fma.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/1440 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 lambda2)))))))))))
#s(approx (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)) (fma.f64 #s(literal 1/24 binary64) (cos.f64 lambda2) (.f64 lambda1 (fma.f64 #s(literal -1/24 binary64) (neg.f64 (sin.f64 lambda2)) (fma.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda2) (+.f64 (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/4320 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))) (*.f64 #s(literal 1/144 binary64) (neg.f64 (sin.f64 lambda2))))))))))))))
#s(approx (* (* phi2 phi2) (cos (- lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2)))
#s(approx (* (* phi2 phi2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 (*.f64 phi2 phi2) (cos.f64 lambda2))))
#s(approx (* (* phi2 phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (.f64 phi2 phi2) (cos.f64 lambda2))))) (.f64 (*.f64 phi2 phi2) (cos.f64 lambda2))))
#s(approx (* (* phi2 phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (.f64 phi2 phi2) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (.f64 phi2 phi2) (cos.f64 lambda2))))
#s(approx (* 1/24 (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)))
#s(approx (* 1/24 (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/24 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda2))))
#s(approx (* 1/24 (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/24 binary64) (cos.f64 lambda2) (.f64 lambda1 (fma.f64 #s(literal -1/24 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/48 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))
#s(approx (* 1/24 (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/24 binary64) (cos.f64 lambda2) (.f64 lambda1 (fma.f64 #s(literal -1/24 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/144 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2))))))))))
#s(approx (* -1/2 (cos (- lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
#s(approx (* -1/2 (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2))))))
#s(approx (* -1/2 (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 lambda1 (fma.f64 #s(literal 1/4 binary64) (.f64 lambda1 (cos.f64 lambda2)) (*.f64 #s(literal 1/2 binary64) (neg.f64 (sin.f64 lambda2)))))))
#s(approx (* -1/2 (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1/12 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal 1/4 binary64) (cos.f64 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2)))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal 1/6 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2)))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2)))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2)))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal 1/6 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2)))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal 1/6 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 (cos.f64 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#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)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (sin lambda1) (cos lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
#s(approx (sin lambda1) (sin.f64 lambda1))
#s(approx (* (cos lambda1) (sin lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
#s(approx (cos lambda1) (cos.f64 lambda1))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (- lambda1 lambda2) lambda1)
#s(approx (- lambda1 lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 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)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (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))))
#s(approx (* (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) lambda1) lambda1)
#s(approx (* (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (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))))
#s(approx (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) #s(literal 1 binary64))
#s(approx (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) (+.f64 #s(literal 1 binary64) (/.f64 (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)))
#s(approx (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (*.f64 #s(literal 2 binary64) lambda1))
#s(approx (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (.f64 lambda1 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 (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)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (+.f64 (.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 (+.f64 lambda1 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 lambda2 phi1) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 (+.f64 lambda1 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 lambda2 phi1) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 (+.f64 lambda1 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 lambda2 phi1) lambda1)) #s(literal 1/2 binary64))))
#s(approx (+ (neg (- lambda1 lambda2)) (neg phi1)) (*.f64 #s(literal -1 binary64) lambda1))
#s(approx (+ (neg (- lambda1 lambda2)) (neg phi1)) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) (+.f64 #s(literal 1 binary64) (/.f64 phi1 lambda1)))))
#s(approx (neg (- lambda1 lambda2)) (*.f64 #s(literal -1 binary64) lambda1))
#s(approx (neg (- lambda1 lambda2)) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))
#s(approx (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 lambda2 phi1) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 lambda2 phi1) lambda1)) #s(literal 1/2 binary64))))
#s(approx (- (neg (- lambda1 lambda2)) (neg phi1)) (*.f64 #s(literal -1 binary64) lambda1))
#s(approx (- (neg (- lambda1 lambda2)) (neg phi1)) (*.f64 lambda1 (-.f64 (/.f64 (+.f64 lambda2 phi1) lambda1) #s(literal 1 binary64))))
#s(approx (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (* phi2 phi2) (cos (- lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* 1/24 (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* -1/2 (cos (- lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#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)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) lambda1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) lambda1))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.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 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))
#s(approx (- lambda1 lambda2) (.f64 #s(literal -1 binary64) (.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)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (* (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) lambda1)))
#s(approx (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))) lambda1)) #s(literal 2 binary64)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (+.f64 (.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (+.f64 phi1 (.f64 #s(literal -1 binary64) lambda1))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 #s(literal 1/24 binary64) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (+.f64 phi1 (.f64 #s(literal -1 binary64) lambda1))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 lambda2 phi1) lambda1))))))
#s(approx (+ (neg (- lambda1 lambda2)) (neg phi1)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 lambda2 phi1) lambda1))))))
#s(approx (neg (- lambda1 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1))))))
#s(approx (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (+.f64 phi1 (*.f64 #s(literal -1 binary64) lambda1))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 lambda2 phi1) lambda1))))))
#s(approx (- (neg (- lambda1 lambda2)) (neg phi1)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda2 phi1) lambda1))))))
#s(approx (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 #s(literal 1/24 binary64) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 #s(literal 1/24 binary64) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (.f64 #s(literal 1/24 binary64) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (* (* phi2 phi2) (cos (- lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (* 1/24 (cos (- lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (* -1/2 (cos (- lambda1 lambda2))) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (sin.f64 lambda1))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (sin.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))) (cos.f64 lambda1)))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (sin.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 lambda1)))))
#s(approx (* (sin lambda1) (cos lambda2)) (sin.f64 lambda1))
#s(approx (* (sin lambda1) (cos lambda2)) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 lambda2 lambda2) (sin.f64 lambda1)))))
#s(approx (* (sin lambda1) (cos lambda2)) (+.f64 (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 lambda2 lambda2) (sin.f64 lambda1)))))))
#s(approx (* (sin lambda1) (cos lambda2)) (+.f64 (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 lambda2 lambda2) (sin.f64 lambda1)) (*.f64 #s(literal 1/24 binary64) (sin.f64 lambda1))))))))
#s(approx (cos lambda2) #s(literal 1 binary64))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda2 lambda2)) #s(literal 1/2 binary64)))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 lambda2 lambda2)))) #s(literal 1/2 binary64)))))
#s(approx lambda2 lambda2)
#s(approx (* (cos lambda1) (sin lambda2)) (*.f64 lambda2 (cos.f64 lambda1)))
#s(approx (* (cos lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (cos.f64 lambda1) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 lambda2 lambda2) (cos.f64 lambda1))))))
#s(approx (* (cos lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (cos.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 lambda2 lambda2) (cos.f64 lambda1))))))))
#s(approx (* (cos lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (cos.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 lambda2 lambda2) (cos.f64 lambda1)) (.f64 #s(literal 1/120 binary64) (cos.f64 lambda1)))))))))
#s(approx (sin lambda2) lambda2)
#s(approx (sin lambda2) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2)))))
#s(approx (sin lambda2) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2)) #s(literal 1/6 binary64))))))
#s(approx (sin lambda2) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2)))) #s(literal 1/6 binary64))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (sin.f64 lambda1))))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (- lambda1 lambda2) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (* (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) lambda1) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) lambda1 (.f64 #s(literal 2 binary64) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) lambda1 (.f64 #s(literal 2 binary64) (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)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (sin.f64 lambda1))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (sin.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1)))))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (sin.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (cos.f64 lambda1)))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (fma.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda1))))))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (fma.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1)))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (sin.f64 lambda1))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda1)))))))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (fma.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1)))))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1)))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 1/4 binary64) (cos.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (sin.f64 lambda1)))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda1)))))))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (fma.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1)))))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1)))))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/48 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1)))) (fma.f64 #s(literal 1/48 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1)))) (fma.f64 #s(literal 1/16 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1)))) (.f64 #s(literal 1/16 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1)))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 1/12 binary64) (sin.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/144 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/4320 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 1/4 binary64) (cos.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1))))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (sin.f64 lambda1)))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda1)))))))))
#s(approx (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (*.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1)))))) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1))))) (.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1))))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1)))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1))))) (.f64 lambda2 (fma.f64 #s(literal 1/48 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1)))) (fma.f64 #s(literal 1/48 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1)))) (fma.f64 #s(literal 1/16 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1)))) (.f64 #s(literal 1/16 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1)))))))))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1)))))))
#s(approx (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda2 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1))))))))
#s(approx (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 lambda2 (-.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 lambda2 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1))))))) (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1))))))))
#s(approx (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1)))
#s(approx (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 phi1) (*.f64 #s(literal 1/2 binary64) lambda2)))
#s(approx (+ (neg (- lambda1 lambda2)) (neg phi1)) (*.f64 #s(literal -1 binary64) (+.f64 lambda1 phi1)))
#s(approx (+ (neg (- lambda1 lambda2)) (neg phi1)) (-.f64 lambda2 (+.f64 lambda1 phi1)))
#s(approx (neg (- lambda1 lambda2)) (-.f64 lambda2 lambda1))
#s(approx (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1)))))))
#s(approx (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda2 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1))))))))
#s(approx (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 lambda2 (-.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 lambda2 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1))))))) (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1))))))))
#s(approx (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1)))
#s(approx (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (fma.f64 #s(literal 1/2 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 lambda1))))
#s(approx (- (neg (- lambda1 lambda2)) (neg phi1)) (-.f64 phi1 lambda1))
#s(approx (- (neg (- lambda1 lambda2)) (neg phi1)) (-.f64 (+.f64 lambda2 phi1) lambda1))
#s(approx (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda1)))))))
#s(approx (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (fma.f64 lambda2 (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (sin.f64 lambda1)))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda1))))))))
#s(approx (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 1/4 binary64) (cos.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (sin.f64 lambda1))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda1))))))))
#s(approx (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 1/12 binary64) (sin.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/144 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/4320 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 1/4 binary64) (cos.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (sin.f64 lambda1))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda1))))))))
#s(approx (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda1))))))
#s(approx (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (sin.f64 lambda1))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda1)))))))
#s(approx (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (cos.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (sin.f64 lambda1)))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda1)))))))
#s(approx (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (cos.f64 lambda1) (fma.f64 lambda2 (fma.f64 #s(literal 1/12 binary64) (sin.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/144 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/4320 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (sin.f64 lambda1)))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (.f64 #s(literal 1/24 binary64) (cos.f64 lambda1)))))))
#s(approx (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda1))))
#s(approx (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (+.f64 (.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1))) (fma.f64 #s(literal 1/24 binary64) (cos.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (*.f64 #s(literal 1/24 binary64) (sin.f64 lambda1)))))))
#s(approx (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (fma.f64 #s(literal 1/24 binary64) (cos.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (fma.f64 #s(literal 1/24 binary64) (sin.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/1440 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 lambda1)))))))))))
#s(approx (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (fma.f64 #s(literal 1/24 binary64) (cos.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (fma.f64 #s(literal 1/24 binary64) (sin.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda1) (fma.f64 #s(literal 1/1440 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1/144 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/4320 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1))))))))))))))
#s(approx (* (* phi2 phi2) (cos (- lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1)))
#s(approx (* (* phi2 phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (.f64 (.f64 phi2 phi2) (sin.f64 lambda1)) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1))))
#s(approx (* (* phi2 phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (.f64 phi2 phi2) (cos.f64 lambda1))) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1))) (.f64 (*.f64 phi2 phi2) (cos.f64 lambda1))))
#s(approx (* (* phi2 phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 lambda1))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (.f64 phi2 phi2) (sin.f64 lambda1))))) (.f64 (.f64 phi2 phi2) (sin.f64 lambda1))) (.f64 (*.f64 phi2 phi2) (cos.f64 lambda1))))
#s(approx (* 1/24 (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda1)))
#s(approx (* 1/24 (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/24 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/24 binary64) (.f64 lambda2 (sin.f64 lambda1)))))
#s(approx (* 1/24 (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/24 binary64) (cos.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1/48 binary64) (.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/24 binary64) (sin.f64 lambda1))))))
#s(approx (* 1/24 (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/24 binary64) (cos.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal 1/24 binary64) (sin.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1/48 binary64) (cos.f64 lambda1) (.f64 #s(literal -1/144 binary64) (.f64 lambda2 (sin.f64 lambda1)))))))))
#s(approx (* -1/2 (cos (- lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))
#s(approx (* -1/2 (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (sin.f64 lambda1)))))
#s(approx (* -1/2 (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))))
#s(approx (* -1/2 (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal 1/12 binary64) (.f64 lambda2 (sin.f64 lambda1)) (.f64 #s(literal 1/4 binary64) (cos.f64 lambda1))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))) (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 #s(literal 2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (cos lambda2) (cos.f64 lambda2))
#s(approx (sin lambda2) (sin.f64 lambda2))
#s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (*.f64 #s(literal 1/2 binary64) lambda2))
#s(approx (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 lambda1 phi1) lambda2)))))
#s(approx (+ (neg (- lambda1 lambda2)) (neg phi1)) lambda2)
#s(approx (+ (neg (- lambda1 lambda2)) (neg phi1)) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda1 phi1) lambda2)))))
#s(approx (neg (- lambda1 lambda2)) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))))
#s(approx (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (*.f64 #s(literal 1/2 binary64) lambda2))
#s(approx (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 phi1 lambda1) lambda2)))))
#s(approx (- (neg (- lambda1 lambda2)) (neg phi1)) lambda2)
#s(approx (- (neg (- lambda1 lambda2)) (neg phi1)) (*.f64 lambda2 (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi1 lambda2)) (/.f64 lambda1 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (- lambda1 lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (* (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) lambda1) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) lambda1 (.f64 #s(literal 2 binary64) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))))
#s(approx (/ (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* lambda1 2)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) lambda1 (.f64 #s(literal 2 binary64) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))) lambda1)))
#s(approx (+ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (fma.f64 #s(literal 2 binary64) lambda1 (.f64 #s(literal 2 binary64) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (+.f64 (.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 (+.f64 phi1 (.f64 #s(literal -1 binary64) lambda2))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 #s(literal 1/24 binary64) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))))))
#s(approx (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 (+.f64 phi1 (.f64 #s(literal -1 binary64) lambda2))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (sin.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 lambda1 (+.f64 phi1 (*.f64 #s(literal -1 binary64) lambda2))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (.f64 #s(literal -1 binary64) (.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 lambda1 phi1) lambda2)) #s(literal 1/2 binary64)))))
#s(approx (+ (neg (- lambda1 lambda2)) (neg phi1)) (.f64 #s(literal -1 binary64) (.f64 lambda2 (-.f64 (/.f64 (+.f64 lambda1 phi1) lambda2) #s(literal 1 binary64)))))
#s(approx (neg (- lambda1 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))
#s(approx (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (.f64 #s(literal -1 binary64) (.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 phi1 lambda1) lambda2)) #s(literal 1/2 binary64)))))
#s(approx (- (neg (- lambda1 lambda2)) (neg phi1)) (.f64 #s(literal -1 binary64) (.f64 lambda2 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 phi1 lambda1) lambda2)) #s(literal 1 binary64)))))
#s(approx (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 #s(literal 1/24 binary64) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))))
#s(approx (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 #s(literal 1/24 binary64) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (.f64 #s(literal 1/24 binary64) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (* (* phi2 phi2) (cos (- lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* 1/24 (cos (- lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* -1/2 (cos (- lambda1 lambda2))) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1)))) #s(literal 1/2 binary64))))))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1)))) #s(literal 1/2 binary64)))))
#s(approx phi1 phi1)
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1)))) #s(literal 1/2 binary64))))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (+.f64 (.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (fma.f64 #s(literal 2 binary64) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))))) (+.f64 (.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (fma.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 phi1 (fma.f64 #s(literal 2 binary64) (.f64 phi1 (fma.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (fma.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 phi1 (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))) (.f64 phi1 (fma.f64 #s(literal 2 binary64) (.f64 phi1 (fma.f64 #s(literal -1/16 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (fma.f64 #s(literal 1/48 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 #s(literal 1/16 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))))))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (fma.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (.f64 phi1 (fma.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (.f64 phi1 (fma.f64 #s(literal -1/16 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (fma.f64 #s(literal 1/48 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 #s(literal 1/16 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))))))))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 phi1 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))))
#s(approx (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 phi1 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 phi1 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))))))
#s(approx (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 phi1 (-.f64 (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 #s(literal -1/48 binary64) (.f64 phi1 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))))))
#s(approx (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
#s(approx (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (fma.f64 #s(literal -1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))
#s(approx (+ (neg (- lambda1 lambda2)) (neg phi1)) (-.f64 lambda2 lambda1))
#s(approx (+ (neg (- lambda1 lambda2)) (neg phi1)) (-.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) phi1)) lambda1))
#s(approx (neg phi1) (*.f64 #s(literal -1 binary64) phi1))
#s(approx (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 phi1 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))))
#s(approx (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 phi1 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 phi1 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))))))
#s(approx (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 phi1 (-.f64 (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 phi1 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))))) (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))))))
#s(approx (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
#s(approx (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))
#s(approx (- (neg (- lambda1 lambda2)) (neg phi1)) (-.f64 lambda2 lambda1))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1)))) #s(literal 1/2 binary64))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (+.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (+.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/720 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))))))) (.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64)))) (+.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 phi1 phi1))) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 phi1 phi1)) #s(literal 1 binary64)))) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (.f64 phi1 phi1)))) #s(literal 1 binary64)))) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (pow (cos phi1) 2) #s(literal 1 binary64))
#s(approx (pow (cos phi1) 2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 phi1 phi1))))
#s(approx (pow (cos phi1) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 phi1 phi1)) #s(literal 1 binary64)))))
#s(approx (pow (cos phi1) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (.f64 phi1 phi1)))) #s(literal 1 binary64)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1)))) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (*.f64 #s(literal -1/2 binary64) phi1))
#s(approx (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (.f64 phi1 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 lambda2 lambda1) phi1)) #s(literal 1/2 binary64))))
#s(approx (+ (neg (- lambda1 lambda2)) (neg phi1)) (*.f64 #s(literal -1 binary64) phi1))
#s(approx (+ (neg (- lambda1 lambda2)) (neg phi1)) (*.f64 phi1 (-.f64 (/.f64 lambda2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 lambda1 phi1)))))
#s(approx (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (*.f64 #s(literal 1/2 binary64) phi1))
#s(approx (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 lambda2 lambda1) phi1)))))
#s(approx (- (neg (- lambda1 lambda2)) (neg phi1)) phi1)
#s(approx (- (neg (- lambda1 lambda2)) (neg phi1)) (*.f64 phi1 (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda2 phi1)) (/.f64 lambda1 phi1))))
#s(approx (pow (cos phi1) 2) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (+.f64 (.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1 binary64) phi1))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) phi1)) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 (+.f64 lambda1 (.f64 #s(literal -1 binary64) phi1))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) phi1)) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) phi1)) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2) (.f64 #s(literal -1 binary64) (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 lambda2 lambda1) phi1))))))
#s(approx (+ (neg (- lambda1 lambda2)) (neg phi1)) (.f64 #s(literal -1 binary64) (.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 lambda2 lambda1) phi1))))))
#s(approx (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) phi1))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2) (.f64 #s(literal -1 binary64) (.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 lambda2 lambda1) phi1)) #s(literal 1/2 binary64)))))
#s(approx (- (neg (- lambda1 lambda2)) (neg phi1)) (.f64 #s(literal -1 binary64) (.f64 phi1 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 lambda2 lambda1) phi1)) #s(literal 1 binary64)))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (-.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))))) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (-.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))))) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (cos phi2) #s(literal 1 binary64))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (.f64 phi2 phi2) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2)))) #s(literal 1/2 binary64)))))
#s(approx phi2 phi2)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 (+.f64 lambda1 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 lambda2 phi1) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 (+.f64 lambda1 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 lambda2 phi1) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (fma.f64 #s(literal 2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 (+.f64 lambda1 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 lambda2 phi1) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* phi2 phi2) (*.f64 phi2 phi2))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/24 binary64) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/24 binary64) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 2/45 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1/3 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/3 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -2/45 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (cos phi2) (cos.f64 phi2))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 6 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (.f64 (pow.f64 phi2 #s(literal 6 binary64)) (fma.f64 #s(literal -1/720 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (.f64 (pow.f64 phi2 #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 phi2 #s(literal 4 binary64))) (fma.f64 #s(literal -1/720 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))
#s(approx (+ (* 2 (* (cos (/ (+ (neg (- lambda1 lambda2)) (neg phi1)) 2)) (cos (/ (- (neg (- lambda1 lambda2)) (neg phi1)) 2)))) (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2))) (.f64 (pow.f64 phi2 #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 phi2 #s(literal 4 binary64))) (fma.f64 #s(literal -1/720 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 lambda2 (+.f64 lambda1 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 lambda2 phi1) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 phi2 #s(literal 6 binary64)))))))))
#s(approx (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 6 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (.f64 (pow.f64 phi2 #s(literal 6 binary64)) (fma.f64 #s(literal -1/720 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))
#s(approx (* (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (.f64 (pow.f64 phi2 #s(literal 6 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 phi2 #s(literal 4 binary64))) (fma.f64 #s(literal -1/720 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))
#s(approx (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi2 #s(literal 4 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 4 binary64)) (fma.f64 #s(literal -1/720 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))
#s(approx (+ (* (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (* phi2 phi2)) (* -1/2 (cos (- lambda1 lambda2)))) (.f64 (pow.f64 phi2 #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (pow.f64 phi2 #s(literal 4 binary64))) (fma.f64 #s(literal -1/720 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))
#s(approx (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (.f64 #s(literal -1/720 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (* (* phi2 phi2) (cos (- lambda1 lambda2))) -1/720) (* 1/24 (cos (- lambda1 lambda2)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))

eval337.0ms (2.1%)

Memory: 5.7MiB live, 400.5MiB allocated; 57ms collecting garbage
Compiler: Compiled 95 981 to 8 105 computations (91.6% saved)

prune1.2s (7.3%)

Memory

-16.6MiB live, 1 377.6MiB allocated; 112ms collecting garbage

Pruning

17 alts after pruning (16 fresh and 1 done)

	Pruned	Kept	Total
New	1 393	11	1 404
Fresh	5	5	10
Picked	4	1	5
Done	0	0	0
Total	1 402	17	1 419

Accuracy

99.9%

Counts

1 419 → 17

Alt Table

Click to see full alt table

Status	Accuracy	Program
	66.3%	(/.f64 (-.f64 (.f64 lambda1 lambda1) (.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))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))))
	53.7%	(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (fabs.f64 lambda1) (fabs.f64 lambda1) (-.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))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (fabs.f64 lambda1) (fabs.f64 lambda1) (-.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))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))))))
▶	98.4%	(+.f64 lambda1 (atan2.f64 (.f64 (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 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	89.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	98.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
▶	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
	98.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64))) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	98.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))))
	93.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
	93.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (.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 lambda1 lambda2)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))))) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
	93.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))))
▶	93.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(approx ( (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
	78.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 #s(approx (pow (cos phi1) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (.f64 phi1 phi1)))) #s(literal 1 binary64))))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
	81.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
✓	72.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)))) (.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))))))
	85.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
▶	98.2%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.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))) #s(literal 2 binary64)) (.f64 lambda1 #s(literal 2 binary64))) (/.f64 (.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda1 #s(literal 2 binary64)))) lambda1))

Compiler

Compiled 2 206 to 885 computations (59.9% saved)

series356.0ms (2.2%)

Memory

18.3MiB live, 380.6MiB allocated; 27ms collecting garbage

Counts

85 → 669

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
51.0ms	phi2	@	inf	((+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (cos phi2) phi2 (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) lambda2 (* (cos lambda1) (sin lambda2)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (cos phi1) phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) lambda1) (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) 2 (* lambda1 2) (/ (* lambda1 2) (* lambda1 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2)))) (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))) (neg (sin lambda2)) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2))))) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))) 1/3 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))) (* -1 (pow (cos lambda2) 2)) -1 (pow (cos lambda2) 2) (* (neg (sin lambda2)) (neg (sin lambda2))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3) 3 (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin phi2) (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos phi2) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))))
49.0ms	lambda1	@	0	((+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (cos phi2) phi2 (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) lambda2 (* (cos lambda1) (sin lambda2)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (cos phi1) phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) lambda1) (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) 2 (* lambda1 2) (/ (* lambda1 2) (* lambda1 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2)))) (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))) (neg (sin lambda2)) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2))))) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))) 1/3 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))) (* -1 (pow (cos lambda2) 2)) -1 (pow (cos lambda2) 2) (* (neg (sin lambda2)) (neg (sin lambda2))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3) 3 (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin phi2) (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos phi2) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))))
47.0ms	phi2	@	0	((+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (cos phi2) phi2 (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) lambda2 (* (cos lambda1) (sin lambda2)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (cos phi1) phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) lambda1) (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) 2 (* lambda1 2) (/ (* lambda1 2) (* lambda1 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2)))) (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))) (neg (sin lambda2)) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2))))) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))) 1/3 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))) (* -1 (pow (cos lambda2) 2)) -1 (pow (cos lambda2) 2) (* (neg (sin lambda2)) (neg (sin lambda2))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3) 3 (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin phi2) (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos phi2) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))))
35.0ms	lambda2	@	-inf	((+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (cos phi2) phi2 (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) lambda2 (* (cos lambda1) (sin lambda2)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (cos phi1) phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) lambda1) (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) 2 (* lambda1 2) (/ (* lambda1 2) (* lambda1 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2)))) (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))) (neg (sin lambda2)) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2))))) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))) 1/3 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))) (* -1 (pow (cos lambda2) 2)) -1 (pow (cos lambda2) 2) (* (neg (sin lambda2)) (neg (sin lambda2))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3) 3 (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin phi2) (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos phi2) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))))
22.0ms	lambda1	@	-inf	((+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (cos phi2) phi2 (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) lambda2 (* (cos lambda1) (sin lambda2)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (cos phi1) phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (* (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) lambda1) (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) 2 (* lambda1 2) (/ (* lambda1 2) (* lambda1 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2)))) (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))) (neg (sin lambda2)) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2))))) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))) 1/3 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))) (* -1 (pow (cos lambda2) 2)) -1 (pow (cos lambda2) 2) (* (neg (sin lambda2)) (neg (sin lambda2))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3) 3 (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2))) (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin phi2) (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos phi2) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))))

rewrite466.0ms (2.9%)

Memory

42.3MiB live, 467.3MiB allocated; 124ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2952	41008
0	3142	35729
0	9354	34744

Stop Event

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

Counts

754 → 859

Calls

Call 1

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

Outputs
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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))) (+.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))))))
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)))
(/.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))) (+.f64 (.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 phi2) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 phi2))
(cos.f64 phi2)
(+.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
(sin.f64 lambda1)
(sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 lambda2)))
(cos.f64 (neg.f64 lambda2))
(cos.f64 lambda2)
lambda2
(*.f64 (cos.f64 lambda1) (sin.f64 lambda2))
(sin.f64 (+.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
(/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(sin.f64 (+.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (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 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (.f64 (/.f64 (fma.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))) #s(literal 2 binary64) (.f64 lambda1 #s(literal 2 binary64))) (.f64 lambda1 #s(literal 2 binary64))) lambda1))
(.f64 (/.f64 (fma.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))) #s(literal 2 binary64) (.f64 lambda1 #s(literal 2 binary64))) (.f64 lambda1 #s(literal 2 binary64))) lambda1)
(/.f64 (+.f64 (pow.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)) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 lambda1 lambda1) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (.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)) (.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))) (-.f64 (.f64 (.f64 (/.f64 lambda1 lambda1) #s(literal 1 binary64)) (.f64 (/.f64 lambda1 lambda1) #s(literal 1 binary64))) (.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)) (*.f64 (/.f64 lambda1 lambda1) #s(literal 1 binary64))))))
(/.f64 (fma.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))) #s(literal 2 binary64) (.f64 lambda1 #s(literal 2 binary64))) (*.f64 lambda1 #s(literal 2 binary64)))
(/.f64 (fma.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))) #s(literal 2 binary64)) (.f64 lambda1 #s(literal 2 binary64)) (.f64 (.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda1 #s(literal 2 binary64)))) (.f64 (.f64 lambda1 #s(literal 2 binary64)) (*.f64 lambda1 #s(literal 2 binary64))))
(fma.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) (.f64 (/.f64 lambda1 lambda1) #s(literal 1 binary64)))
(+.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)) (*.f64 (/.f64 lambda1 lambda1) #s(literal 1 binary64)))
(.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))
(/.f64 (neg.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))) #s(literal 2 binary64))) (neg.f64 (*.f64 lambda1 #s(literal 2 binary64))))
(/.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))) #s(literal 2 binary64)) (*.f64 lambda1 #s(literal 2 binary64)))
(.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))) #s(literal 2 binary64))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 lambda1 lambda2)
(/.f64 (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
#s(literal 2 binary64)
(*.f64 lambda1 #s(literal 2 binary64))
(*.f64 (/.f64 lambda1 lambda1) #s(literal 1 binary64))
(/.f64 (neg.f64 (.f64 lambda1 #s(literal 2 binary64))) (neg.f64 (.f64 lambda1 #s(literal 2 binary64))))
(/.f64 (.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda1 #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(approx ( (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(approx ( (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(approx ( (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(approx ( (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 #s(approx ( (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 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)))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))) (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (.f64 (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))))
(fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
(+.f64 (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) #s(literal 3 binary64)) (pow.f64 (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))))))
(fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))
(+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))
#s(literal -2 binary64)
(.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(*.f64 (cos.f64 phi2) (cos.f64 phi2))
(pow.f64 (cos.f64 phi2) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 phi2)) #s(literal 2 binary64)))
(*.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))
(neg.f64 (sin.f64 lambda2))
(sin.f64 (+.f64 lambda2 (PI.f64)))
(sin.f64 (neg.f64 lambda2))
(cos.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))) #s(literal 3 binary64)) (pow.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))) (.f64 (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))))
(fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))
(+.f64 (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))
(.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (.f64 (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))))
(fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+.f64 (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
#s(literal 1/3 binary64)
(*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (-.f64 (.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))
(fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
#s(literal -1 binary64)
(*.f64 (cos.f64 lambda2) (cos.f64 lambda2))
(pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 lambda2)) #s(literal 2 binary64)))
(*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (neg.f64 (neg.f64 (sin.f64 lambda2))))
(*.f64 (fabs.f64 (neg.f64 (sin.f64 lambda2))) (fabs.f64 (neg.f64 (sin.f64 lambda2))))
(*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda2))
(pow.f64 (neg.f64 (sin.f64 lambda2)) #s(literal 2 binary64))
(pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (neg.f64 (sin.f64 lambda2))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 lambda2)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 2 binary64))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/.f64 (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (.f64 (.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))))
(fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))
(+.f64 (.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))
(.f64 (neg.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (neg.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(.f64 (fabs.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fabs.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(.f64 (fabs.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (fabs.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(pow.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 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 (cos.f64 phi1) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 3 binary64)))
#s(literal 3 binary64)
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))))
(fma.f64 (neg.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (neg.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(fma.f64 (fabs.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fabs.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(fma.f64 (fabs.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (fabs.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(+.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (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))) (+.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))))))
(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)))
(/.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))) (+.f64 (.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 phi2) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 phi2))
(cos.f64 phi2)
(+.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(sin.f64 phi2)
#s(literal 0 binary64)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(*.f64 (cos.f64 phi2) #s(literal 1 binary64))
#s(literal 1 binary64)
(/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx lambda1 lambda1)
#s(approx (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (-.f64 (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))) (sin.f64 lambda2)))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (-.f64 (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2)))))) (sin.f64 lambda2)))
#s(approx (* (sin lambda1) (cos lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (* (sin lambda1) (cos lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 lambda1 lambda1) (cos.f64 lambda2))))))
#s(approx (* (sin lambda1) (cos lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 lambda1 lambda1) (cos.f64 lambda2))))))))
#s(approx (* (sin lambda1) (cos lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 lambda1 lambda1) (cos.f64 lambda2)) (.f64 #s(literal 1/120 binary64) (cos.f64 lambda2)))))))))
#s(approx (sin lambda1) lambda1)
#s(approx (sin lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1)))))
#s(approx (sin lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/6 binary64))))))
#s(approx (sin lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1)))) #s(literal 1/6 binary64))))))
#s(approx (* (cos lambda1) (sin lambda2)) (sin.f64 lambda2))
#s(approx (* (cos lambda1) (sin lambda2)) (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 lambda1 lambda1) (sin.f64 lambda2)))))
#s(approx (* (cos lambda1) (sin lambda2)) (+.f64 (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda2) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 lambda1 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (cos lambda1) (sin lambda2)) (+.f64 (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 lambda1 lambda1) (sin.f64 lambda2)) (*.f64 #s(literal 1/24 binary64) (sin.f64 lambda2))))))))
#s(approx (cos lambda1) #s(literal 1 binary64))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1)) #s(literal 1/2 binary64)))))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1)))) #s(literal 1/2 binary64)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2))))) (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda1 (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2))))) (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (sin.f64 lambda2)))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 lambda1 (sin.f64 lambda2)))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 lambda1 lambda1) (sin.f64 lambda2))))))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 lambda1 lambda1) (sin.f64 lambda2))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 lambda1 lambda1) (sin.f64 lambda2)) (.f64 #s(literal 1/120 binary64) (sin.f64 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2.f64 (.f64 (cos.f64 phi2) (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) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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)))))))
#s(approx (* (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) 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))))))
#s(approx (* (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) lambda1) (+.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)))))))
#s(approx (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) (/.f64 (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))
#s(approx (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) (/.f64 (+.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))
#s(approx (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/.f64 (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))
#s(approx (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (.f64 #s(literal 2 binary64) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (neg.f64 (sin.f64 lambda2)))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (neg.f64 (sin.f64 lambda2))))))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2))))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2)))))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (* lambda1 2) (*.f64 #s(literal 2 binary64) lambda1))
#s(approx (/ (* lambda1 2) (* lambda1 2)) #s(literal 1 binary64))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda1 (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)))))
#s(approx (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))
#s(approx (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))))
#s(approx (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))
#s(approx (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))
#s(approx (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 lambda1 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (+.f64 (.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))))) (.f64 (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (/.f64 (fma.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (+.f64 (.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))))) (.f64 (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))) (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (/.f64 (+.f64 (.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))))) (.f64 (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 lambda1 (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 lambda1 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (-.f64 (fma.f64 lambda1 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (fma.f64 lambda1 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda1 (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)))) (.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2))))) (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2))))) (.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2))))))) (.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2))))) (.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (sin lambda1) (cos lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
#s(approx (sin lambda1) (sin.f64 lambda1))
#s(approx (* (cos lambda1) (sin lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
#s(approx (cos lambda1) (cos.f64 lambda1))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (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))))
#s(approx (* (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) lambda1) lambda1)
#s(approx (* (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (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))))
#s(approx (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) #s(literal 1 binary64))
#s(approx (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) (+.f64 #s(literal 1 binary64) (/.f64 (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)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (- lambda1 lambda2) lambda1)
#s(approx (- lambda1 lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) lambda1))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (*.f64 (cos.f64 lambda2) (sin.f64 lambda2)))))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) lambda1))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2))) (.f64 lambda1 lambda1))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) lambda1)))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2))) (.f64 lambda1 lambda1))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (.f64 lambda1 lambda1) lambda1)) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) lambda1))))))
#s(approx (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) (.f64 (.f64 lambda1 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))))))
#s(approx (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) (.f64 (.f64 lambda1 lambda1) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) lambda1))))
#s(approx (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) (.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2))) (.f64 lambda1 lambda1))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) lambda1)))))
#s(approx (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (.f64 (.f64 lambda1 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))))))
#s(approx (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (.f64 (.f64 lambda1 lambda1) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) lambda1))))
#s(approx (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (*.f64 (cos.f64 lambda2) (sin.f64 lambda2)))))))
#s(approx (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (.f64 lambda1 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) lambda1))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) lambda1))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (* (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) lambda1)))
#s(approx (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) lambda1))
#s(approx (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (.f64 #s(literal 2 binary64) (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (- lambda1 lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) lambda1))))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 lambda2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2))) lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))) lambda1))))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) lambda1))) lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))) lambda1))))))
#s(approx (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda2) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2))) lambda1) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))))))
#s(approx (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) lambda1))))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (atan2.f64 (.f64 (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (sin.f64 lambda1))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (sin.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))) (cos.f64 lambda1)))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (sin.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 lambda1)))))
#s(approx (* (sin lambda1) (cos lambda2)) (sin.f64 lambda1))
#s(approx (* (sin lambda1) (cos lambda2)) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 lambda2 lambda2) (sin.f64 lambda1)))))
#s(approx (* (sin lambda1) (cos lambda2)) (+.f64 (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 lambda2 lambda2) (sin.f64 lambda1)))))))
#s(approx (* (sin lambda1) (cos lambda2)) (+.f64 (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 lambda2 lambda2) (sin.f64 lambda1)) (*.f64 #s(literal 1/24 binary64) (sin.f64 lambda1))))))))
#s(approx (cos lambda2) #s(literal 1 binary64))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda2 lambda2)) #s(literal 1/2 binary64)))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 lambda2 lambda2)))) #s(literal 1/2 binary64)))))
#s(approx lambda2 lambda2)
#s(approx (* (cos lambda1) (sin lambda2)) (*.f64 lambda2 (cos.f64 lambda1)))
#s(approx (* (cos lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (cos.f64 lambda1) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 lambda2 lambda2) (cos.f64 lambda1))))))
#s(approx (* (cos lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (cos.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 lambda2 lambda2) (cos.f64 lambda1))))))))
#s(approx (* (cos lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (cos.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 lambda2 lambda2) (cos.f64 lambda1)) (.f64 #s(literal 1/120 binary64) (cos.f64 lambda1)))))))))
#s(approx (sin lambda2) lambda2)
#s(approx (sin lambda2) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2)))))
#s(approx (sin lambda2) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2)) #s(literal 1/6 binary64))))))
#s(approx (sin lambda2) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2)))) #s(literal 1/6 binary64))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda1))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (sin.f64 lambda1)))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 lambda2 (sin.f64 lambda1)))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 lambda2 lambda2) (sin.f64 lambda1))))))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 lambda2 lambda2) (sin.f64 lambda1))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 lambda2 lambda2) (sin.f64 lambda1)) (.f64 #s(literal 1/120 binary64) (sin.f64 lambda1)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (sin.f64 lambda1))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (sin.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1)))))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (+.f64 (sin.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (cos.f64 lambda1)))))))))
#s(approx (- lambda1 lambda2) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda1))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (sin.f64 lambda1))))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 #s(literal 2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (fma.f64 lambda1 (.f64 lambda2 (fma.f64 #s(literal -4/3 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 lambda2 (fma.f64 lambda1 (fma.f64 #s(literal -4/3 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 lambda2 (fma.f64 lambda1 (fma.f64 #s(literal -4/3 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 lambda1 (.f64 lambda2 (fma.f64 #s(literal 8/9 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))))))))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 lambda2 (fma.f64 #s(literal -4/3 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))))
#s(approx (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 lambda2 (fma.f64 #s(literal -4/3 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))))))
#s(approx (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 lambda2 (fma.f64 #s(literal -4/3 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 lambda2 (fma.f64 #s(literal 8/9 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))))))))))))
#s(approx (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2)))) (.f64 #s(literal -1 binary64) (.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))))
#s(approx (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal 1/120 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 #s(literal 1/12 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))))))))
#s(approx (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2)))) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/144 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1/240 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 #s(literal -1/5040 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/120 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 #s(literal 1/12 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))))))))))
#s(approx (* (cos lambda2) (neg (sin lambda2))) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (* (cos lambda2) (neg (sin lambda2))) (.f64 lambda2 (-.f64 (.f64 #s(literal 2/3 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64))))
#s(approx (* (cos lambda2) (neg (sin lambda2))) (.f64 lambda2 (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 2/3 binary64) (.f64 #s(literal -2/15 binary64) (*.f64 lambda2 lambda2)))) #s(literal 1 binary64))))
#s(approx (* (cos lambda2) (neg (sin lambda2))) (.f64 lambda2 (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 2/3 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal 4/315 binary64) (*.f64 lambda2 lambda2)) #s(literal 2/15 binary64))))) #s(literal 1 binary64))))
#s(approx (neg (sin lambda2)) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (neg (sin lambda2)) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64))))
#s(approx (neg (sin lambda2)) (.f64 lambda2 (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/120 binary64) (*.f64 lambda2 lambda2)))) #s(literal 1 binary64))))
#s(approx (neg (sin lambda2)) (.f64 lambda2 (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal 1/5040 binary64) (*.f64 lambda2 lambda2)) #s(literal 1/120 binary64))))) #s(literal 1 binary64))))
#s(approx (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (fma.f64 #s(literal -4/3 binary64) (.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (*.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))))
#s(approx (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 lambda2 (fma.f64 #s(literal -4/3 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 lambda1 (*.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))))))
#s(approx (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 lambda2 (fma.f64 #s(literal -4/3 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 lambda2 (fma.f64 #s(literal 8/9 binary64) (.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))))))))
#s(approx (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
#s(approx (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (fma.f64 #s(literal -4/3 binary64) (.f64 lambda1 (.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 #s(literal -4/3 binary64) (.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))))))
#s(approx (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 lambda2 (fma.f64 #s(literal -4/3 binary64) (.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 lambda2 (fma.f64 #s(literal 8/9 binary64) (.f64 lambda1 (.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))))))
#s(approx (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2))))) (.f64 #s(literal -4/3 binary64) (.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2))))) (.f64 lambda2 (fma.f64 #s(literal -4/3 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 #s(literal 8/9 binary64) (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))))
#s(approx (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2))))) (.f64 lambda2 (fma.f64 #s(literal -4/3 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -8/45 binary64) (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 #s(literal 8/9 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))))))
#s(approx (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2))))) (.f64 lambda2 (fma.f64 #s(literal -4/3 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal 8/9 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -8/45 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 #s(literal 16/945 binary64) (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))))))))
#s(approx (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))) (*.f64 #s(literal -4/3 binary64) lambda2))
#s(approx (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))) (.f64 lambda2 (-.f64 (.f64 #s(literal 8/9 binary64) (*.f64 lambda2 lambda2)) #s(literal 4/3 binary64))))
#s(approx (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))) (.f64 lambda2 (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 8/9 binary64) (.f64 #s(literal -8/45 binary64) (*.f64 lambda2 lambda2)))) #s(literal 4/3 binary64))))
#s(approx (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))) (.f64 lambda2 (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 8/9 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal 16/945 binary64) (*.f64 lambda2 lambda2)) #s(literal 8/45 binary64))))) #s(literal 4/3 binary64))))
#s(approx (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))) (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
#s(approx (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))))
#s(approx (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -2/3 binary64) (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))))
#s(approx (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -2/3 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 #s(literal 4/45 binary64) (.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))))))))
#s(approx (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))) #s(literal -1 binary64))
#s(approx (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))) (-.f64 (.f64 #s(literal 2 binary64) (.f64 lambda2 lambda2)) #s(literal 1 binary64)))
#s(approx (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))) (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2/3 binary64) (.f64 lambda2 lambda2)))) #s(literal 1 binary64)))
#s(approx (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))) (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 2 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal 4/45 binary64) (.f64 lambda2 lambda2)) #s(literal 2/3 binary64))))) #s(literal 1 binary64)))
#s(approx (* -1 (pow (cos lambda2) 2)) #s(literal -1 binary64))
#s(approx (* -1 (pow (cos lambda2) 2)) (-.f64 (*.f64 lambda2 lambda2) #s(literal 1 binary64)))
#s(approx (* -1 (pow (cos lambda2) 2)) (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (.f64 lambda2 lambda2)))) #s(literal 1 binary64)))
#s(approx (* -1 (pow (cos lambda2) 2)) (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 lambda2 lambda2)) #s(literal 1/3 binary64))))) #s(literal 1 binary64)))
#s(approx (pow (cos lambda2) 2) #s(literal 1 binary64))
#s(approx (pow (cos lambda2) 2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 lambda2 lambda2))))
#s(approx (pow (cos lambda2) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 lambda2 lambda2)) #s(literal 1 binary64)))))
#s(approx (pow (cos lambda2) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (.f64 lambda2 lambda2)))) #s(literal 1 binary64)))))
#s(approx (* (neg (sin lambda2)) (neg (sin lambda2))) (*.f64 lambda2 lambda2))
#s(approx (* (neg (sin lambda2)) (neg (sin lambda2))) (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (.f64 lambda2 lambda2)))))
#s(approx (* (neg (sin lambda2)) (neg (sin lambda2))) (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 lambda2 lambda2)) #s(literal 1/3 binary64))))))
#s(approx (* (neg (sin lambda2)) (neg (sin lambda2))) (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (.f64 lambda2 lambda2)))) #s(literal 1/3 binary64))))))
#s(approx (* (pow (cos phi2) 2) (pow (cos lambda2) 2)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))
#s(approx (* (pow (cos phi2) 2) (pow (cos lambda2) 2)) (fma.f64 #s(literal -1 binary64) (.f64 (.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 phi2) 2) (pow (cos lambda2) 2)) (fma.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (.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 phi2) 2) (pow (cos lambda2) 2)) (fma.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -2/45 binary64) (.f64 (.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)))))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 lambda2 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 lambda2 (-.f64 (fma.f64 lambda2 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 lambda2 (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 lambda2 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (fma.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (fma.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)))) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (fma.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (fma.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (fma.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)))) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 lambda2 (-.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 lambda2 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (-.f64 (fma.f64 lambda2 (-.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 lambda2 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2))))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2))))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2))))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2))))))))) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (cos lambda2) (cos.f64 lambda2))
#s(approx (sin lambda2) (sin.f64 lambda2))
#s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2)))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)))))
#s(approx (* (cos lambda2) (neg (sin lambda2))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))
#s(approx (neg (sin lambda2)) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))))
#s(approx (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (*.f64 (cos.f64 lambda2) (sin.f64 lambda2)))))
#s(approx (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))
#s(approx (* -1 (pow (cos lambda2) 2)) (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
#s(approx (pow (cos lambda2) 2) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
#s(approx (* (neg (sin lambda2)) (neg (sin lambda2))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
#s(approx (* (pow (cos phi2) 2) (pow (cos lambda2) 2)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (* (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))) lambda1))))
#s(approx (+ (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/ (* lambda1 2) (* lambda1 2))) (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))) lambda1)))
#s(approx (/ (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (* lambda1 2)) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))) lambda1))
#s(approx (* (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) 2) (.f64 #s(literal 2 binary64) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (- lambda1 lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (.f64 (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (atan2.f64 (.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1)))) #s(literal 1/2 binary64))))))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1)))) #s(literal 1/2 binary64)))))
#s(approx phi1 phi1)
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1)))) #s(literal 1/2 binary64))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (+.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (+.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/720 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))))))) (.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64)))) (+.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 phi1 phi1))) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 phi1 phi1)) #s(literal 1 binary64)))) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (.f64 phi1 phi1)))) #s(literal 1 binary64)))) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (pow (cos phi1) 2) #s(literal 1 binary64))
#s(approx (pow (cos phi1) 2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 phi1 phi1))))
#s(approx (pow (cos phi1) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 phi1 phi1)) #s(literal 1 binary64)))))
#s(approx (pow (cos phi1) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (.f64 phi1 phi1)))) #s(literal 1 binary64)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1)))) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 3/2 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 7/8 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 3/2 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (-.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 3/2 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 7/8 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))) (/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 3/2 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (-.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 3/2 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64)))) (-.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 61/240 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))))))) (.f64 #s(literal 7/8 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64)))) (/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 3/2 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (-.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 3/2 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -3/2 binary64) (.f64 phi1 phi1) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 phi1 phi1)) #s(literal 3/2 binary64))) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 7/8 binary64) (.f64 #s(literal -61/240 binary64) (.f64 phi1 phi1)))) #s(literal 3/2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))
#s(approx (pow (cos phi1) 3) #s(literal 1 binary64))
#s(approx (pow (cos phi1) 3) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -3/2 binary64) (.f64 phi1 phi1))))
#s(approx (pow (cos phi1) 3) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 phi1 phi1)) #s(literal 3/2 binary64)))))
#s(approx (pow (cos phi1) 3) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 7/8 binary64) (.f64 #s(literal -61/240 binary64) (.f64 phi1 phi1)))) #s(literal 3/2 binary64)))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi1 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1)))) #s(literal 1/2 binary64))))))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (pow (cos phi1) 2) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
#s(approx (pow (cos phi1) 3) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (-.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))))) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (-.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))))) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) #s(literal 1 binary64))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (.f64 phi2 phi2) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2)))) #s(literal 1/2 binary64)))))
#s(approx phi2 phi2)
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 2/45 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1/3 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/3 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -2/45 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (*.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 lambda1 (fma.f64 #s(literal 2/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal 1/3 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (*.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))))))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))))) (* (pow (cos phi2) 2) (pow (cos lambda2) 2))) (fma.f64 lambda1 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal 2/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal 1/3 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 lambda1 (fma.f64 #s(literal -4/45 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -2/45 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal -2/45 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))))))))))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (*.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))
#s(approx (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))))))
#s(approx (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 2/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal 1/3 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (*.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))))))))))
#s(approx (+ (* -2 (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 2/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (fma.f64 lambda1 (fma.f64 #s(literal 1/3 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -4/45 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 #s(literal -2/45 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (*.f64 #s(literal -2/45 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))))))))))))
#s(approx (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2)))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))
#s(approx (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))))
#s(approx (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2)))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/3 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))))
#s(approx (* (pow (cos phi2) 2) (* (cos lambda2) (neg (sin lambda2)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal 2/45 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))))))))
#s(approx (pow (cos phi2) 2) #s(literal 1 binary64))
#s(approx (pow (cos phi2) 2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 phi2 phi2))))
#s(approx (pow (cos phi2) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64)))))
#s(approx (pow (cos phi2) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (.f64 phi2 phi2) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (.f64 phi2 phi2)))) #s(literal 1 binary64)))))
#s(approx (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))
#s(approx (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (fma.f64 lambda1 (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (*.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))
#s(approx (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (.f64 (.f64 phi2 phi2) (fma.f64 lambda1 (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 1/3 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))))))
#s(approx (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (.f64 (.f64 phi2 phi2) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))) (.f64 (.f64 phi2 phi2) (fma.f64 lambda1 (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -2/45 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal -2/45 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) (.f64 lambda1 (fma.f64 #s(literal 1/3 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (*.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))))))))
#s(approx (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (*.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))
#s(approx (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 1/3 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (*.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))
#s(approx (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal 1/3 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -2/45 binary64) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (*.f64 #s(literal -2/45 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))))))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))
#s(approx (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (*.f64 (cos.f64 lambda2) (sin.f64 lambda2)))))
#s(approx (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal -1/3 binary64) (*.f64 (cos.f64 lambda2) (sin.f64 lambda2))))))
#s(approx (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal 1/3 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))))))))))
#s(approx (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos lambda2) (neg (sin lambda2)))) (* (cos lambda2) (neg (sin lambda2))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (fma.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -2/45 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))))))))))
#s(approx (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))
#s(approx (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (* (neg (sin lambda2)) (neg (sin lambda2))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -2/45 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (* (pow (cos phi2) 2) (pow (cos lambda2) 2)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
#s(approx (* (pow (cos phi2) 2) (pow (cos lambda2) 2)) (fma.f64 #s(literal -1 binary64) (.f64 (.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 phi2) 2) (pow (cos lambda2) 2)) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 (.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 phi2) 2) (pow (cos lambda2) 2)) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -2/45 binary64) (.f64 (.f64 phi2 phi2) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (/ (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))))) (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -61/240 binary64) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -2/45 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (fma.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 7/8 binary64) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -3/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 phi2 phi2) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (fma.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -3/2 binary64) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 7/8 binary64) (.f64 (.f64 phi2 phi2) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (* (* (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow (cos phi1) 3)) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -61/240 binary64) (.f64 (.f64 phi2 phi2) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 7/8 binary64) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (neg (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (-.f64 (+.f64 (.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -2/45 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (neg (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (- (pow (cos phi1) 2) (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 phi2 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 phi2 (fma.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/6 binary64) (.f64 phi2 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi2 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))))
#s(approx (sin phi2) phi2)
#s(approx (sin phi2) (.f64 phi2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)))))
#s(approx (sin phi2) (.f64 phi2 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2)) #s(literal 1/6 binary64))))))
#s(approx (sin phi2) (.f64 phi2 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (.f64 phi2 phi2) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2)))) #s(literal 1/6 binary64))))))
#s(approx (* (cos phi2) (sin (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (* (cos phi2) (sin (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (cos phi2) (sin (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (cos phi2) (sin (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/24 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (cos.f64 phi2))
#s(approx (pow (cos phi2) 2) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))
#s(approx (+ (* (sin phi2) (cos (/ (PI) 2))) (* (cos phi2) (sin (/ (PI) 2)))) (fma.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2))))
#s(approx (sin phi2) (sin.f64 phi2))
#s(approx (* (cos phi2) (sin (/ (PI) 2))) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))

eval1.2s (7.2%)

Memory: -53.0MiB live, 840.2MiB allocated; 1.5s collecting garbage
Compiler: Compiled 165 316 to 10 782 computations (93.5% saved)

prune1.7s (10.3%)

Memory

23.4MiB live, 1 833.4MiB allocated; 286ms collecting garbage

Pruning

17 alts after pruning (14 fresh and 3 done)

	Pruned	Kept	Total
New	1 746	6	1 752
Fresh	3	8	11
Picked	3	2	5
Done	0	1	1
Total	1 752	17	1 769

Accuracy

100.0%

Counts

1 769 → 17

Alt Table

Click to see full alt table

Status	Accuracy	Program
	66.3%	(/.f64 (-.f64 (.f64 lambda1 lambda1) (.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))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))))
	53.7%	(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (fabs.f64 lambda1) (fabs.f64 lambda1) (-.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))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (fabs.f64 lambda1) (fabs.f64 lambda1) (-.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))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))))))
▶	99.7%	(+.f64 #s(approx lambda1 lambda1) (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
✓	98.4%	(+.f64 lambda1 (atan2.f64 (.f64 (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 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	98.5%	(+.f64 lambda1 (atan2.f64 (.f64 (/.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))) (+.f64 (.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)))))) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))))
▶	89.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	98.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
	81.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
▶	98.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64))) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	84.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (pow (cos phi1) 3) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 7/8 binary64) (.f64 #s(literal -61/240 binary64) (.f64 phi1 phi1)))) #s(literal 3/2 binary64)))))) (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))))
	93.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
▶	93.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (.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 lambda1 lambda2)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))))) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
	93.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))))
	51.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(approx ( (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (/.f64 (+.f64 (pow.f64 (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))) (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (.f64 (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
✓	72.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)))) (.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))))))
▶	85.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
✓	98.2%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.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))) #s(literal 2 binary64)) (.f64 lambda1 #s(literal 2 binary64))) (/.f64 (.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda1 #s(literal 2 binary64)))) lambda1))

Compiler

Compiled 2 678 to 907 computations (66.1% saved)

series227.0ms (1.4%)

Memory

-24.6MiB live, 350.4MiB allocated; 38ms collecting garbage

Counts

83 → 577

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
30.0ms	lambda2	@	inf	((+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1 lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (cos phi2) phi2 (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) lambda2 (* (cos lambda1) (sin lambda2)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (cos phi1) phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* lambda2 (- (/ lambda1 lambda2) 1)) (- (/ lambda1 lambda2) 1) (/ lambda1 lambda2) 1 (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (cos (- lambda1 lambda2)) (sin (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (pow (* (sin (- lambda1 lambda2)) 0) 3) (* (sin (- lambda1 lambda2)) 0) 0 3 (pow (* (cos (- lambda1 lambda2)) 1) 3) (* (cos (- lambda1 lambda2)) 1) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)))) (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))) (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (cos lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))
29.0ms	phi2	@	-inf	((+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1 lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (cos phi2) phi2 (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) lambda2 (* (cos lambda1) (sin lambda2)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (cos phi1) phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* lambda2 (- (/ lambda1 lambda2) 1)) (- (/ lambda1 lambda2) 1) (/ lambda1 lambda2) 1 (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (cos (- lambda1 lambda2)) (sin (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (pow (* (sin (- lambda1 lambda2)) 0) 3) (* (sin (- lambda1 lambda2)) 0) 0 3 (pow (* (cos (- lambda1 lambda2)) 1) 3) (* (cos (- lambda1 lambda2)) 1) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)))) (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))) (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (cos lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))
20.0ms	phi1	@	inf	((+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1 lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (cos phi2) phi2 (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) lambda2 (* (cos lambda1) (sin lambda2)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (cos phi1) phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* lambda2 (- (/ lambda1 lambda2) 1)) (- (/ lambda1 lambda2) 1) (/ lambda1 lambda2) 1 (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (cos (- lambda1 lambda2)) (sin (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (pow (* (sin (- lambda1 lambda2)) 0) 3) (* (sin (- lambda1 lambda2)) 0) 0 3 (pow (* (cos (- lambda1 lambda2)) 1) 3) (* (cos (- lambda1 lambda2)) 1) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)))) (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))) (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (cos lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))
17.0ms	lambda1	@	inf	((+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1 lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (cos phi2) phi2 (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) lambda2 (* (cos lambda1) (sin lambda2)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (cos phi1) phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* lambda2 (- (/ lambda1 lambda2) 1)) (- (/ lambda1 lambda2) 1) (/ lambda1 lambda2) 1 (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (cos (- lambda1 lambda2)) (sin (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (pow (* (sin (- lambda1 lambda2)) 0) 3) (* (sin (- lambda1 lambda2)) 0) 0 3 (pow (* (cos (- lambda1 lambda2)) 1) 3) (* (cos (- lambda1 lambda2)) 1) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)))) (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))) (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (cos lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))
16.0ms	lambda1	@	-inf	((+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) lambda1 lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (cos phi2) phi2 (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) lambda2 (* (cos lambda1) (sin lambda2)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (cos phi1) phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (* lambda2 (- (/ lambda1 lambda2) 1)) (- (/ lambda1 lambda2) 1) (/ lambda1 lambda2) 1 (+ (cos phi1) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))))) (* (cos phi2) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))))) (+ (* (sin (- lambda1 lambda2)) (cos (/ (PI) 2))) (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2)))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (cos (- lambda1 lambda2)) (sin (/ (PI) 2))) (cos (- lambda1 lambda2)) (sin (/ (PI) 2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (pow (* (sin (- lambda1 lambda2)) 0) 3) (* (sin (- lambda1 lambda2)) 0) 0 3 (pow (* (cos (- lambda1 lambda2)) 1) 3) (* (cos (- lambda1 lambda2)) 1) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)))) (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))) (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)) (* (cos (- lambda1 lambda2)) (cos phi2)) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (- (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (* (sin lambda1) (cos lambda2)) (cos lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))

rewrite301.0ms (1.9%)

Memory

24.9MiB live, 404.6MiB allocated; 19ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2345	33448
0	2524	24022
0	8707	23269

Stop Event

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

Counts

660 → 792

Calls

Call 1

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

Outputs
(/.f64 (+.f64 (pow.f64 #s(approx lambda1 lambda1) #s(literal 3 binary64)) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #s(literal 3 binary64))) (fma.f64 #s(approx lambda1 lambda1) #s(approx lambda1 lambda1) (-.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (.f64 #s(approx lambda1 lambda1) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
(+.f64 #s(approx lambda1 lambda1) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx lambda1 lambda1)
lambda1
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (+.f64 phi2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 phi2))
(cos.f64 phi2)
phi2
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))))
(/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
(sin.f64 lambda1)
(sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 lambda2)))
(cos.f64 (neg.f64 lambda2))
(cos.f64 lambda2)
lambda2
(*.f64 (cos.f64 lambda1) (sin.f64 lambda2))
(sin.f64 (+.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
(/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(sin.f64 (+.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
phi1
(.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (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 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64) (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64)))) (neg.f64 (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64) (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64))) (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))))) (/.f64 (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64)) (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))))))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(/.f64 (-.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))
(sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))
#s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
(*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))
(-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))
(/.f64 (neg.f64 lambda1) (neg.f64 lambda2))
(/.f64 lambda1 lambda2)
#s(literal 1 binary64)
(/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (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 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64) (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64)))) (neg.f64 (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64) (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64))) (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))))) (/.f64 (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64)) (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))))))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))))
(/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (.f64 (.f64 lambda2 lambda2) lambda2)) (fma.f64 lambda1 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda2))))
(-.f64 lambda1 lambda2)
#s(literal 0 binary64)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64) (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64)))) (neg.f64 (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64) (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64))) (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))))) (/.f64 (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64)) (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))))))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))
#s(literal 1 binary64)
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))))) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))) (neg.f64 (-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) (-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))
(*.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)))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64) (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64)))) (neg.f64 (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64) (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64))) (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))))) (/.f64 (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64)) (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))))))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))
(.f64 (fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64)) (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64))) (.f64 (.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64))))))
(fma.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64) (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64)))
(fma.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64)))
(fma.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64)))
(+.f64 (.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64)) (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 0 binary64))
(.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)))
(.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))))
(pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) #s(literal 3 binary64)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))
#s(literal 0 binary64)
#s(literal 3 binary64)
(.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1 binary64))
(.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))))
(pow.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) #s(literal 3 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) #s(literal 3 binary64)))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)))) (-.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))))) (.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))))))))
(fma.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))))
(fma.f64 (fabs.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (fabs.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 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 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))))
(+.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))))
(.f64 (neg.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (neg.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))))
(.f64 (fabs.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (fabs.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))))
(.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)))
(pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (fma.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))))))
(-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))))
(.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (neg.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))))
(.f64 (fabs.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (fabs.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))
(pow.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) #s(literal 2 binary64))
(.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))))
(-.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64))) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64))) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64))) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64))) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64))) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64))) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64))) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64))) (.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(-.f64 (.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64))) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64)))
#s(approx (cos lambda2) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))))
(/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (fma.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (.f64 (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))))))
(-.f64 (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)))
(.f64 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64)))
(.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))
(pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))) (.f64 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))))
(fma.f64 (neg.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (neg.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (fabs.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fabs.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))
(+.f64 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))))
(fma.f64 (neg.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (neg.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (fabs.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (fabs.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
(.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx lambda1 lambda1)
#s(approx (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (-.f64 (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))) (sin.f64 lambda2)))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (-.f64 (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2)))))) (sin.f64 lambda2)))
#s(approx (* (sin lambda1) (cos lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))
#s(approx (* (sin lambda1) (cos lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 lambda1 lambda1) (cos.f64 lambda2))))))
#s(approx (* (sin lambda1) (cos lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 lambda1 lambda1) (cos.f64 lambda2))))))))
#s(approx (* (sin lambda1) (cos lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 lambda1 lambda1) (cos.f64 lambda2)) (.f64 #s(literal 1/120 binary64) (cos.f64 lambda2)))))))))
#s(approx (sin lambda1) lambda1)
#s(approx (sin lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1)))))
#s(approx (sin lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/6 binary64))))))
#s(approx (sin lambda1) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1)))) #s(literal 1/6 binary64))))))
#s(approx (* (cos lambda1) (sin lambda2)) (sin.f64 lambda2))
#s(approx (* (cos lambda1) (sin lambda2)) (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 lambda1 lambda1) (sin.f64 lambda2)))))
#s(approx (* (cos lambda1) (sin lambda2)) (+.f64 (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda2) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 lambda1 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (cos lambda1) (sin lambda2)) (+.f64 (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 lambda1 lambda1) (sin.f64 lambda2)) (*.f64 #s(literal 1/24 binary64) (sin.f64 lambda2))))))))
#s(approx (cos lambda1) #s(literal 1 binary64))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1)) #s(literal 1/2 binary64)))))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 (.f64 lambda1 lambda1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1)))) #s(literal 1/2 binary64)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2))))) (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (sin.f64 lambda2))))) (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos.f64 lambda2))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (sin.f64 lambda2)))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 lambda1 (sin.f64 lambda2)))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 lambda1 lambda1) (sin.f64 lambda2))))))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 lambda1 lambda1) (sin.f64 lambda2))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 lambda1 lambda1) (sin.f64 lambda2)) (.f64 #s(literal 1/120 binary64) (sin.f64 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 lambda1 (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (neg.f64 (sin.f64 lambda2)))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (neg.f64 (sin.f64 lambda2))))))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (+.f64 (neg.f64 (sin.f64 lambda2)) (.f64 lambda1 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (- (/ lambda1 lambda2) 1) #s(literal -1 binary64))
#s(approx (- (/ lambda1 lambda2) 1) (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))
#s(approx (/ lambda1 lambda2) (/.f64 lambda1 lambda2))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2)))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal 1/6 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2)))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2)))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2)))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal 1/6 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2)))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2)))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal 1/6 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 (cos.f64 lambda2) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 (cos.f64 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos.f64 lambda2))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2)))))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 lambda1 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))) (/.f64 (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
#s(approx (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos.f64 lambda2))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2)))))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)))
#s(approx (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))))) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))))
#s(approx (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2)))) (.f64 (cos.f64 lambda2) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2)))))))))) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))))
#s(approx (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))))) (.f64 (cos.f64 lambda2) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))))))))) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))))
#s(approx (pow (* (sin (- lambda1 lambda2)) 0) 3) #s(literal 0 binary64))
#s(approx (* (sin (- lambda1 lambda2)) 0) #s(literal 0 binary64))
#s(approx (pow (* (cos (- lambda1 lambda2)) 1) 3) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)))
#s(approx (pow (* (cos (- lambda1 lambda2)) 1) 3) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))))) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) 1) 3) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2)))) (.f64 (cos.f64 lambda2) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2)))))))))) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) 1) 3) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda2) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (sin.f64 lambda2)) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (sin.f64 lambda2)))))) (.f64 (cos.f64 lambda2) (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))))))))) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (cos.f64 lambda2))
#s(approx (* (cos (- lambda1 lambda2)) 1) (+.f64 (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2))))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (neg.f64 (sin.f64 lambda2)))))) (neg.f64 (sin.f64 lambda2))))))
#s(approx (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
#s(approx (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)))) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)))) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2)))))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
#s(approx (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) #s(literal 0 binary64))
#s(approx (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
#s(approx (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
#s(approx (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2)))))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
#s(approx (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
#s(approx (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
#s(approx (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (fma.f64 #s(literal -2 binary64) (.f64 lambda1 (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
#s(approx (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2)))))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
#s(approx (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (fma.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (sin.f64 lambda2))))))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))
#s(approx (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)) #s(literal 0 binary64))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))))))) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (/.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (/.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 lambda2)) (/.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (cos.f64 phi2)) (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (fma.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 lambda1 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (cos.f64 phi2)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))) (sin.f64 lambda2))) (+.f64 (/.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 lambda2) (-.f64 (.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 lambda2)) (/.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (cos.f64 phi2)) (sin.f64 lambda2))))) (sin.f64 lambda2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 lambda2)) (/.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (cos.f64 phi2)) (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal 3/2 binary64) (sin.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (sin.f64 lambda2)) (/.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (cos.f64 lambda2))))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (fma.f64 #s(literal 3/2 binary64) (sin.f64 lambda2) (.f64 lambda1 (-.f64 (/.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (sin.f64 lambda2)) (+.f64 (/.f64 (.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 lambda2) (-.f64 (.f64 #s(literal 3/2 binary64) (sin.f64 lambda2)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (sin.f64 lambda2)) (/.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (sin.f64 lambda2))))) (sin.f64 lambda2))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (sin.f64 lambda2)) (/.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (sin.f64 lambda2))))) (.f64 #s(literal -1 binary64) (cos.f64 lambda2))))))
#s(approx (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))
#s(approx (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (-.f64 (.f64 #s(literal 3/2 binary64) (.f64 (*.f64 lambda1 lambda1) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))
#s(approx (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 lambda1 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))
#s(approx (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 lambda1 (fma.f64 #s(literal -7/8 binary64) (.f64 lambda1 (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)))) (*.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))
#s(approx (pow (* (sin lambda1) (cos lambda2)) 3) (pow.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal 3 binary64)))
#s(approx (pow (* (sin lambda1) (cos lambda2)) 3) (.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 #s(literal -1/2 binary64) (.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)))))
#s(approx (pow (* (sin lambda1) (cos lambda2)) 3) (.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (.f64 #s(literal 13/120 binary64) (.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))))) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)))))
#s(approx (pow (* (sin lambda1) (cos lambda2)) 3) (.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -41/3024 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)))))
#s(approx (pow (* (cos lambda1) (sin lambda2)) 3) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
#s(approx (pow (* (cos lambda1) (sin lambda2)) 3) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))
#s(approx (pow (* (cos lambda1) (sin lambda2)) 3) (fma.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))
#s(approx (pow (* (cos lambda1) (sin lambda2)) 3) (fma.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -61/240 binary64) (.f64 (.f64 lambda1 lambda1) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (.f64 #s(literal 7/8 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))
#s(approx (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
#s(approx (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))) (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda2))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
#s(approx (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (.f64 lambda1 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda2))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))
#s(approx (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (.f64 lambda1 (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))
#s(approx (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (.f64 lambda1 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))))))))
#s(approx (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (.f64 lambda1 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (fma.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal 1/12 binary64) (*.f64 (cos.f64 lambda2) (sin.f64 lambda2))))))))))))
#s(approx (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (.f64 lambda1 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda2) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))) (+.f64 (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))) (+.f64 (.f64 #s(literal 1/12 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2))) (.f64 (.f64 lambda1 lambda1) (fma.f64 #s(literal -1/144 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (fma.f64 #s(literal -1/240 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (.f64 #s(literal -1/5040 binary64) (.f64 (cos.f64 lambda2) (sin.f64 lambda2)))))))))))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) lambda1))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (sin lambda1) (cos lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
#s(approx (sin lambda1) (sin.f64 lambda1))
#s(approx (* (cos lambda1) (sin lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
#s(approx (cos lambda1) (cos.f64 lambda1))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) lambda1))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (- lambda1 lambda2) lambda1)
#s(approx (- lambda1 lambda2) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) lambda1)
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
#s(approx (- (/ lambda1 lambda2) 1) (/.f64 lambda1 lambda2))
#s(approx (- (/ lambda1 lambda2) 1) (*.f64 lambda1 (-.f64 (pow.f64 lambda2 #s(literal -1 binary64)) (pow.f64 lambda1 #s(literal -1 binary64)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) lambda1))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) 1) 3) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) lambda1))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (/.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) lambda1))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (/.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))
#s(approx (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))))
#s(approx (pow (* (sin lambda1) (cos lambda2)) 3) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))))
#s(approx (pow (* (cos lambda1) (sin lambda2)) 3) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))
#s(approx (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))
#s(approx (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))
#s(approx (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (- lambda1 lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (- (/ lambda1 lambda2) 1) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (pow.f64 lambda1 #s(literal -1 binary64)) (pow.f64 lambda2 #s(literal -1 binary64))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (fma.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64))))
#s(approx (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) #s(literal 2 binary64)))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))
#s(approx (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (.f64 (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) 1) 3) (.f64 (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))
#s(approx (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)))) (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))) (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (.f64 (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (/.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (/.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (sin.f64 lambda1))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (+.f64 (sin.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))) (cos.f64 lambda1)))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (+.f64 (sin.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 lambda1)))))
#s(approx (* (sin lambda1) (cos lambda2)) (sin.f64 lambda1))
#s(approx (* (sin lambda1) (cos lambda2)) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 lambda2 lambda2) (sin.f64 lambda1)))))
#s(approx (* (sin lambda1) (cos lambda2)) (+.f64 (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 lambda2 lambda2) (sin.f64 lambda1)))))))
#s(approx (* (sin lambda1) (cos lambda2)) (+.f64 (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 lambda2 lambda2) (sin.f64 lambda1)) (*.f64 #s(literal 1/24 binary64) (sin.f64 lambda1))))))))
#s(approx (cos lambda2) #s(literal 1 binary64))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 lambda2 lambda2)) #s(literal 1/2 binary64)))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 lambda2 lambda2)))) #s(literal 1/2 binary64)))))
#s(approx lambda2 lambda2)
#s(approx (* (cos lambda1) (sin lambda2)) (*.f64 lambda2 (cos.f64 lambda1)))
#s(approx (* (cos lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (cos.f64 lambda1) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 lambda2 lambda2) (cos.f64 lambda1))))))
#s(approx (* (cos lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (cos.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda1) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 lambda2 lambda2) (cos.f64 lambda1))))))))
#s(approx (* (cos lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (cos.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 lambda2 lambda2) (cos.f64 lambda1)) (.f64 #s(literal 1/120 binary64) (cos.f64 lambda1)))))))))
#s(approx (sin lambda2) lambda2)
#s(approx (sin lambda2) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2)))))
#s(approx (sin lambda2) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2)) #s(literal 1/6 binary64))))))
#s(approx (sin lambda2) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2)))) #s(literal 1/6 binary64))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos.f64 lambda1))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (sin.f64 lambda1)))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 lambda2 (sin.f64 lambda1)))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 lambda2 lambda2) (sin.f64 lambda1))))))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 lambda2 lambda2) (sin.f64 lambda1))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 lambda2 lambda2) (sin.f64 lambda1)) (.f64 #s(literal 1/120 binary64) (sin.f64 lambda1)))))))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (sin.f64 lambda1))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (+.f64 (sin.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1)))))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (+.f64 (sin.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (cos.f64 lambda1)))))))))
#s(approx (- lambda1 lambda2) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (- (/ lambda1 lambda2) 1) (/.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)) lambda2))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))) (.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (fma.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (sin.f64 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos.f64 lambda1))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (sin.f64 lambda1))))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 lambda2 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
#s(approx (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 #s(literal 2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))) (.f64 lambda2 (fma.f64 lambda2 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos.f64 lambda1))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (sin.f64 lambda1))))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
#s(approx (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))
#s(approx (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (fma.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (fma.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)))) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) 1) 3) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
#s(approx (pow (* (cos (- lambda1 lambda2)) 1) 3) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1))) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) 1) 3) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))
#s(approx (pow (* (cos (- lambda1 lambda2)) 1) 3) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (fma.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (fma.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)))) (.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (cos.f64 lambda1))
#s(approx (* (cos (- lambda1 lambda2)) 1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (sin.f64 lambda1))))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))
#s(approx (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)))) (fma.f64 #s(literal 2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 lambda1))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda1)))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))
#s(approx (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))) (fma.f64 #s(literal 2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 lambda1))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda1)))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))
#s(approx (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (fma.f64 #s(literal 2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 lambda1))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (fma.f64 lambda2 (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (.f64 #s(literal -1/3 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda1)))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal -3/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2)) (sin.f64 lambda1)) (/.f64 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (sin.f64 lambda1))))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (fma.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (fma.f64 #s(literal -3/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (/.f64 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 lambda1)))) (.f64 (cos.f64 lambda1) (-.f64 (.f64 #s(literal -3/2 binary64) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2)) (sin.f64 lambda1)) (/.f64 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (sin.f64 lambda1)))))) (sin.f64 lambda1)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2)) (sin.f64 lambda1)) (/.f64 (.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (sin.f64 lambda1))))) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (sin.f64 lambda1))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1 binary64) (.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (+.f64 (sin.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (*.f64 #s(literal -3/2 binary64) (sin.f64 lambda1)) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))))) (cos.f64 lambda1)))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (+.f64 (sin.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 lambda2 (-.f64 (fma.f64 #s(literal -3/2 binary64) (sin.f64 lambda1) (.f64 lambda2 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (/.f64 (fma.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (-.f64 (.f64 #s(literal -3/2 binary64) (sin.f64 lambda1)) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1))))))) (sin.f64 lambda1)))))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))))) (cos.f64 lambda1)))))
#s(approx (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)))
#s(approx (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 lambda2 lambda2) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))))
#s(approx (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (fma.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (.f64 #s(literal -1 binary64) (*.f64 lambda2 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))))
#s(approx (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (fma.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (.f64 lambda2 (-.f64 (.f64 #s(literal 7/8 binary64) (.f64 lambda2 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)))) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))))
#s(approx (pow (* (sin lambda1) (cos lambda2)) 3) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)))
#s(approx (pow (* (sin lambda1) (cos lambda2)) 3) (fma.f64 #s(literal -3/2 binary64) (.f64 (.f64 lambda2 lambda2) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))))
#s(approx (pow (* (sin lambda1) (cos lambda2)) 3) (fma.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (.f64 #s(literal 7/8 binary64) (.f64 (.f64 lambda2 lambda2) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))))) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))))
#s(approx (pow (* (sin lambda1) (cos lambda2)) 3) (fma.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -3/2 binary64) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -61/240 binary64) (.f64 (.f64 lambda2 lambda2) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 #s(literal 7/8 binary64) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))))
#s(approx (pow (* (cos lambda1) (sin lambda2)) 3) (pow.f64 (*.f64 lambda2 (cos.f64 lambda1)) #s(literal 3 binary64)))
#s(approx (pow (* (cos lambda1) (sin lambda2)) 3) (.f64 (.f64 (.f64 lambda2 lambda2) lambda2) (fma.f64 #s(literal -1/2 binary64) (.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
#s(approx (pow (* (cos lambda1) (sin lambda2)) 3) (.f64 (.f64 (.f64 lambda2 lambda2) lambda2) (fma.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 #s(literal 13/120 binary64) (.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
#s(approx (pow (* (cos lambda1) (sin lambda2)) 3) (.f64 (.f64 (.f64 lambda2 lambda2) lambda2) (fma.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (.f64 lambda2 lambda2) (fma.f64 #s(literal -41/3024 binary64) (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (*.f64 #s(literal 13/120 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
#s(approx (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))
#s(approx (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))) (fma.f64 lambda2 (*.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 lambda1))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (fma.f64 lambda2 (.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 lambda1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda1) (sin.f64 lambda1))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))
#s(approx (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))
#s(approx (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 lambda2 (fma.f64 lambda2 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)))))
#s(approx (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 lambda2 (fma.f64 lambda2 (fma.f64 lambda2 (.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 lambda1)))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (sin.f64 lambda1)))))
#s(approx (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))) (.f64 lambda2 (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/3 binary64) (.f64 lambda2 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 lambda1))))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 lambda1)))))
#s(approx (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (.f64 lambda2 (.f64 (cos.f64 lambda1) (sin.f64 lambda1))))
#s(approx (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (.f64 lambda2 (fma.f64 (cos.f64 lambda1) (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda1))))))))
#s(approx (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (.f64 lambda2 (fma.f64 (cos.f64 lambda1) (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 lambda1))) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 lambda1) (fma.f64 #s(literal 1/120 binary64) (sin.f64 lambda1) (fma.f64 #s(literal 1/24 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/12 binary64) (sin.f64 lambda1)))))))))))
#s(approx (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))) (.f64 lambda2 (fma.f64 (cos.f64 lambda1) (sin.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (fma.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 lambda1))) (.f64 (.f64 lambda2 lambda2) (fma.f64 (cos.f64 lambda1) (fma.f64 #s(literal 1/120 binary64) (sin.f64 lambda1) (fma.f64 #s(literal 1/24 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/12 binary64) (sin.f64 lambda1)))) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1/144 binary64) (sin.f64 lambda1) (fma.f64 #s(literal -1/240 binary64) (sin.f64 lambda1) (fma.f64 #s(literal -1/720 binary64) (sin.f64 lambda1) (*.f64 #s(literal -1/5040 binary64) (sin.f64 lambda1))))))))))))))
#s(approx (cos lambda2) (cos.f64 lambda2))
#s(approx (sin lambda2) (sin.f64 lambda2))
#s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2)))))) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (- lambda1 lambda2) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (* lambda2 (- (/ lambda1 lambda2) 1)) (.f64 #s(literal -1 binary64) (.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64))))
#s(approx (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) #s(literal 2 binary64)))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (.f64 (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (pow (* (cos (- lambda1 lambda2)) 1) 3) (.f64 (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* (cos (- lambda1 lambda2)) 1) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1)))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (.f64 (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (atan2 (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (/.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1)))) #s(literal 1/2 binary64))))))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1)))) #s(literal 1/2 binary64)))))
#s(approx phi1 phi1)
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1)))) #s(literal 1/2 binary64))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal -1 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal -1 binary64))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal -1 binary64))) (+.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal -1 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal -1 binary64))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal -1 binary64))) (+.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (fma.f64 #s(literal -1/720 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal -1 binary64))))))) (.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal -1 binary64)))) (+.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal -1 binary64)))) (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal -1 binary64))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 phi1 phi1))) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 phi1 phi1)) #s(literal 1 binary64)))) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (.f64 phi1 phi1)))) #s(literal 1 binary64)))) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64))))
#s(approx (pow (cos phi1) 2) #s(literal 1 binary64))
#s(approx (pow (cos phi1) 2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 phi1 phi1))))
#s(approx (pow (cos phi1) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 phi1 phi1)) #s(literal 1 binary64)))))
#s(approx (pow (cos phi1) 2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (.f64 phi1 phi1)))) #s(literal 1 binary64)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1)))) #s(literal 1/2 binary64)))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1)))) #s(literal 1/2 binary64))))))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (pow (cos phi1) 2) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (-.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))))) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (-.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))))) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (cos phi2) #s(literal 1 binary64))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (.f64 phi2 phi2) (+.f64 #s(literal 1/24 binary64) (.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2)))) #s(literal 1/2 binary64)))))
#s(approx phi2 phi2)
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 #s(literal 1/24 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 #s(literal 1/24 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/24 binary64) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/24 binary64) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (/ (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 2/45 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (.f64 #s(literal -1/3 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))) (fma.f64 #s(literal -1/24 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (/.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1/3 binary64) (.f64 (.f64 phi2 phi2) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 #s(literal -1 binary64) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (- (pow (cos phi1) 2) (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2)))) (-.f64 (fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 (.f64 phi2 phi2) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 #s(literal 1/3 binary64) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (.f64 #s(literal -1 binary64) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 phi2 phi2) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 #s(literal 1/3 binary64) (.f64 (.f64 phi2 phi2) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (* (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1 binary64) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -2/45 binary64) (.f64 (.f64 phi2 phi2) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 #s(literal 1/3 binary64) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (+.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (+.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (+.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 #s(literal 1/24 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (+.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (+.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))
#s(approx (* (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda1 lambda2)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda1 lambda2)) 1) (* (cos (- lambda1 lambda2)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda1 lambda2)) 1))))) (cos phi2)) (+.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 #s(literal 1/24 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (- (cos phi1) (* (cos (- lambda1 lambda2)) (cos phi2))) (-.f64 (+.f64 (cos.f64 phi1) (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 #s(literal 1/24 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (+.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (+.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+.f64 (cos.f64 phi1) (+.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 #s(literal 1/24 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (+.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (+.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (+.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 #s(literal 1/24 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (-.f64 (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))
#s(approx (* (cos phi2) (/ (- (pow (* (sin lambda1) (cos lambda2)) 3) (pow (* (cos lambda1) (sin lambda2)) 3)) (+ (* (* (sin lambda1) (cos lambda2)) (* (sin lambda1) (cos lambda2))) (+ (* (* (cos lambda1) (sin lambda2)) (* (cos lambda1) (sin lambda2))) (* (* (sin lambda1) (cos lambda2)) (* (cos lambda1) (sin lambda2))))))) (-.f64 (fma.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 (.f64 phi2 phi2) (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 (.f64 phi2 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))) (.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))))))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))) (/.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))))))
#s(approx (cos phi2) (cos.f64 phi2))

eval343.0ms (2.1%)

Memory: 19.9MiB live, 444.0MiB allocated; 44ms collecting garbage
Compiler: Compiled 117 939 to 7 717 computations (93.5% saved)

prune1.2s (7.6%)

Memory

-21.3MiB live, 1 518.5MiB allocated; 126ms collecting garbage

Pruning

15 alts after pruning (9 fresh and 6 done)

	Pruned	Kept	Total
New	1 328	4	1 332
Fresh	4	5	9
Picked	2	3	5
Done	0	3	3
Total	1 334	15	1 349

Accuracy

100.0%

Counts

1 349 → 15

Alt Table

Click to see full alt table

Status	Accuracy	Program
	66.3%	(/.f64 (-.f64 (.f64 lambda1 lambda1) (.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))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))))
	53.7%	(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (fabs.f64 lambda1) (fabs.f64 lambda1) (-.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))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (fabs.f64 lambda1) (fabs.f64 lambda1) (-.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))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))))))
	99.7%	(+.f64 #s(approx lambda1 lambda1) (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
✓	98.4%	(+.f64 lambda1 (atan2.f64 (.f64 (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 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	98.5%	(+.f64 lambda1 (atan2.f64 (.f64 (/.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))) (+.f64 (.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)))))) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))))
✓	89.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
✓	98.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64))) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	84.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (pow (cos phi1) 3) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 7/8 binary64) (.f64 #s(literal -61/240 binary64) (.f64 phi1 phi1)))) #s(literal 3/2 binary64)))))) (fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (neg.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))))
	93.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
	93.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)))) (-.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))))) (.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 1 binary64))))))))) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
	93.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (.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 lambda1 lambda2)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))))) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))))))))
	51.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(approx ( (* (cos (- lambda1 lambda2)) (cos phi2)) (* (cos (- lambda1 lambda2)) (cos phi2))) (/.f64 (+.f64 (pow.f64 (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))) (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))))))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (.f64 (.f64 lambda1 (fma.f64 #s(literal -2 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (.f64 lambda1 (fma.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))))))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))))))) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))
✓	72.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 phi1)) #s(literal 2 binary64)))) (.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))))))
✓	85.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
✓	98.2%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.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))) #s(literal 2 binary64)) (.f64 lambda1 #s(literal 2 binary64))) (/.f64 (.f64 lambda1 #s(literal 2 binary64)) (.f64 lambda1 #s(literal 2 binary64)))) lambda1))

Compiler

Compiled 4 612 to 892 computations (80.7% saved)

regimes96.0ms (0.6%)

Memory

-6.3MiB live, 87.9MiB allocated; 2ms collecting garbage

Counts

37 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

25.0ms	lambda2
22.0ms	(cos.f64 phi1)
10.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))))))
9.0ms	phi2
9.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)

regimes90.0ms (0.6%)

Memory

12.4MiB live, 108.7MiB allocated; 3ms collecting garbage

Counts

34 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

29.0ms	(cos.f64 phi2)
13.0ms	lambda2
10.0ms	phi2
9.0ms	phi1
9.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
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)

regimes76.0ms (0.5%)

Memory

-12.3MiB live, 82.4MiB allocated; 2ms collecting garbage

Counts

26 → 1

Calls

Call 1

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

Calls

7 calls:

27.0ms	phi1
12.0ms	(cos.f64 phi1)
7.0ms	lambda2
7.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))))))
7.0ms	phi2

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes52.0ms (0.3%)

Memory

-10.3MiB live, 85.8MiB allocated; 3ms collecting garbage

Counts

24 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

8.0ms	lambda2
7.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	phi2
6.0ms	lambda1
6.0ms	phi1

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes22.0ms (0.1%)

Memory

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

Counts

9 → 1

Calls

Call 1

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

Outputs

(+.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 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes37.0ms (0.2%)

Memory

-11.3MiB live, 36.2MiB allocated; 1ms collecting garbage

Counts

8 → 1

Calls

Call 1

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

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:

20.0ms	lambda2
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	phi1
3.0ms	lambda1
3.0ms	phi2

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes21.0ms (0.1%)

Memory

-16.5MiB live, 31.1MiB allocated; 1ms collecting garbage

Counts

6 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

7.0ms	phi1
2.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))))))
2.0ms	lambda1
2.0ms	phi2
2.0ms	lambda2

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes8.0ms (0%)

Memory

18.8MiB live, 18.8MiB 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)))))) (*.f64 (+.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))) #s(literal 2 binary64)) (*.f64 lambda1 #s(literal 2 binary64))) (/.f64 (*.f64 lambda1 #s(literal 2 binary64)) (*.f64 lambda1 #s(literal 2 binary64)))) lambda1))

Outputs

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

simplify55.0ms (0.3%)

Memory

-15.4MiB live, 32.6MiB allocated; 19ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	97	375
1	144	375
2	219	375
3	367	375
4	794	375
5	3521	375

Stop Event

1×	node limit

Calls

Call 1

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

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

derivations219.0ms (1.4%)

Memory

-3.3MiB live, 188.3MiB allocated; 7ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 375 to 97 computations (74.1% saved)

preprocess106.0ms (0.7%)

Memory

39.5MiB live, 181.4MiB allocated; 5ms collecting garbage

Remove

(abs phi2)

(abs phi1)

Compiler

Compiled 1 502 to 454 computations (69.8% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze740.0ms (4.6%)

sample5.6s (34.7%)

explain518.0ms (3.2%)

preprocess180.0ms (1.1%)

eval0.0ms (0%)

prune1.0ms (0%)

series27.0ms (0.2%)

rewrite213.0ms (1.3%)

eval63.0ms (0.4%)

prune172.0ms (1.1%)

series259.0ms (1.6%)

rewrite315.0ms (2%)

eval337.0ms (2.1%)

prune1.2s (7.3%)

series356.0ms (2.2%)

rewrite466.0ms (2.9%)

eval1.2s (7.2%)

prune1.7s (10.3%)

series227.0ms (1.4%)

rewrite301.0ms (1.9%)

eval343.0ms (2.1%)

prune1.2s (7.6%)

regimes96.0ms (0.6%)

regimes90.0ms (0.6%)

regimes76.0ms (0.5%)

regimes52.0ms (0.3%)

regimes22.0ms (0.1%)

regimes37.0ms (0.2%)

regimes21.0ms (0.1%)

regimes8.0ms (0%)

simplify55.0ms (0.3%)

derivations219.0ms (1.4%)

preprocess106.0ms (0.7%)

end0.0ms (0%)

Profiling